home *** CD-ROM | disk | FTP | other *** search
/ Enter 2004 January / enter-2004-01.iso / files / maxima-5.9.0.exe / {app} / share / maxima / 5.9.0 / src / SYS-DECLAIM.lisp < prev    next >
Encoding:
Text File  |  2003-02-09  |  59.3 KB  |  974 lines

  1. ;;; The ANSI version of SYS-PROCLAIM
  2.  
  3. (IN-PACKAGE "MAXIMA") 
  4.  
  5. ;; Let's not try declaiming any functions
  6. #|
  7. (DECLAIM (FTYPE (FUNCTION (FIXNUM) *) FRAME-INFO DBM-UP)) 
  8. (DECLAIM (FTYPE (FUNCTION (*) (VALUES T T)) SYMBOLCONC GEN-NAME)) 
  9. (DECLAIM (FTYPE (FUNCTION (FIXNUM FIXNUM T FIXNUM) T) CPTOM)) 
  10. (DECLAIM
  11.     (FTYPE (FUNCTION (T) FIXNUM) COMPLM SIGN-GJC HAULONG DECIMALSIN
  12.             $ARRAY_NUMBER_OF_DIMENSIONS LOG2 NESTLEV RATDEGREE INFCOUNT
  13.             PRMUSIGN $POLYSIGN FLATSIZE FLATC OPT-HASH ERROR-SIZE
  14.             SIGNUM)) 
  15. (DECLAIM
  16.     (FTYPE (FUNCTION (FIXNUM) T) CMNULL FIXNUM-CFACTOR CHECKFIT
  17.             OUTPUT-LINEAR-ONE-LINE TYOTBSP INDEX* RCPLYGAM CMNULLF
  18.             STYOTBSP)) 
  19. (DECLAIM (FTYPE (FUNCTION (T) (VALUES T T)) $MKEY ASCII)) 
  20. (DECLAIM
  21.     (FTYPE (FUNCTION (T T) FIXNUM) RELATIVE-LINE +MSET
  22.             $ARRAY_DIMENSION_N REVAL FORCEBREAK LOGN TMFACTORIAL)) 
  23. (DECLAIM (FTYPE (FUNCTION (FIXNUM T) T) FIRSTN MTYOTBSP RAND)) 
  24. (DECLAIM
  25.     (FTYPE (FUNCTION (T FIXNUM) T) TRACEMOD0 P2CPOL J[N]-BESSEL
  26.             I[N]-BESSEL DIAGP CPTIMESXA OUTPUT CHECKBREAK OUTPUT-2D
  27.             OUTPUT-LINEAR EXPANDEXPT SPRDET TDBU NZL CPBQ1 POWRS
  28.             EXPONENTIATE-SUM KTERMS)) 
  29. (DECLAIM (FTYPE (FUNCTION (FIXNUM T) FIXNUM) ARRAY-DIMENSION-N)) 
  30. (DECLAIM
  31.     (FTYPE (FUNCTION (FIXNUM FIXNUM) T) UPDATE-HEIGHTS CURSORPOS*
  32.             COMBINATION)) 
  33. (DECLAIM (FTYPE (FUNCTION (T (VECTOR T) FIXNUM) T) MAKE-BREAK-POINT)) 
  34. (DECLAIM
  35.     (FTYPE (FUNCTION (T T T T) *) GCALL3 STORE-INTERNAL-2D
  36.             MARRAYSET-GENSUB LISPM-MFUNCTION-CALL-AUX)) 
  37. (DECLAIM (FTYPE (FUNCTION (T T T T T T) *) DIMENSION)) 
  38. (DECLAIM
  39.     (FTYPE (FUNCTION (T T T) *) LHOSPITAL-CATCH SASSQ SASSQ1
  40.             MARRAYREF-GENSUB SCAN-DIGITS TRIG-CONST)) 
  41. (DECLAIM
  42.     (FTYPE (FUNCTION (T T *) *) MASET1
  43.             APPLY-IN$BIND_DURING_TRANSLATION)) 
  44. (DECLAIM
  45.     (FTYPE (FUNCTION (T T T) T) MAPPLY SP1PUTBUC1 SP1SINCOS1 SP1ADDTO FMAP1
  46.             GETLABELS DNQF BADFUNCHK DSKRAT-SUBST DGQF DISPFUN1 DLQF
  47.             CONSFUNDEF T//$-FOO COEFFICIENT SIMP-%SEC SIMP-%CSC
  48.             SIMP-%COT $ILT FACT20 NPROD KERNSUBST CDINF CD1 DEGVECTOR
  49.             MARK-0 MEMSIMILARL MEMSIMILAR MARK+0 REVEAL MARK+3
  50.             ESTCHECK2 ATDECODE MARK+1 ZFF LCHK FACRTIMES $PADE PADE
  51.             FACT LET-MACRO-HAIR LHSIMP TCONS3 MARK-1 DBUNIVAR UNI
  52.             SIMPPLOG SQFRNORM RGSUBST PVSUBST SIMPBETA $ALGNORM EXPAND1
  53.             GAMMAC SIMPERF SIMPBINOCOEF NEWDET MULTBK SIMPGAMMA
  54.             COEFMATRIX NISSEARCH NISMATCH NISARGMATCH NISARGSCHECKER
  55.             KILL NISEXPOCHECK PUT-TRACE-INFO SIMP-%SIN SIMP-%COS
  56.             MAKE-TRACE-HOOK MACSYMA-UNTRACE-SUB PRED-$READ TSDIFF
  57.             TRACE-EXIT-PRINT TRACE-EXIT-BREAK TRACE-ERROR-BREAK
  58.             TRACE-ENTER-PRINT TRACE-ENTER-BREAK PEXPON*// $ALGTRACE
  59.             LIN-VAR-FIND MONOMGCDCO $PFACTORALG PFACTORALG1
  60.             LINHACKCONTENT PSHIFT PRESULT PGCDA PGSUBST RATGSUBST
  61.             PRIMELMT PGCDU1 PSQUOREM1 RETFACTOR $ATVALUE TIMESIN TMS
  62.             $DERIVDEGREE DIFFINT1 INTERVAL-LIST SIMPINTEG MSUM
  63.             SAME-SHEET-SUBS PSCSUBST PSISIMP LIMIT-SUBS SUBFUNMAKES
  64.             EASY-SUBS SIMPQUOT EXPPLYGAM-FUNS SETARG1 PLYGAM-CONST
  65.             GAM-CONST PLYGAM-POLE MSIZE-TEXT-STRING CSEMIDOWN PSCOEFF1
  66.             POLYINX RATTIMES INTSC1 INTSC PERIOD ARCHK SIMPEXPT LOGCPJ
  67.             PSCHECK LOG*RAT FACTPLUS1 LOGCPI CSEMIUP PDIAG-ALL
  68.             LIFTING-FACTORS-IMAGE INTERP-POLYS PINTERP NEWGCD MTORAT
  69.             LOBJ->POLY INTSC0 GCD-DEGREE-VECTOR SIGNDIS1 POWERCOEFLIST
  70.             PCSUBSTY MONICIZE-ROW FIXVL0 SWAP-ROWS ASSSO PARTIAL-DIAG
  71.             SIMPLN RATTI SIMPATAN2 DIV-DEG-CHK ILT1 MYDEFINT LAPSINH
  72.             LAPSIN REMFACTOR PROPSCHK DSKATOM $BEZOUT GCALL2$ AR$+AR$
  73.             VMAKE $RESULTANT RESULT1 PCSUB INSRT HYPERTRIGINT1 EZGCD
  74.             $LAPLACE RISCHEXPVAR ATFIND APPLY1 FINDEXPON Z1 GETEXP-FUN
  75.             FINDFUN FINDBASE PART+ ATOMCHK PSCOEF SIMPNCEXPT MUL3 DISP1
  76.             SIMPNCT TR-MPROG-BODY OUTER-CONSTANT LAMBDA-WRAP1 QUAD-SL
  77.             SUBSTITUTEL VAR-EXPAND IPOLY2 CALL-AND-SIMP FPOLY2 KEYHOLE
  78.             FACTPLUS0 MSIZE-NOFIX MSIZE-POSTFIX MSIZE-PREFIX
  79.             MSIZE-INFIX SIMPPROD PUTPROP1 MSIZE-ARRAY MSIZE-PAREN
  80.             MSIZE-ATOM EVAL-PRED MSZ MSIZE-NARY MSIZE-MATCHFIX
  81.             MSZ-BIGFLOAT COEFF RATCOEFF RE-SOLVE MEASURE
  82.             FACTPOWERSELECT BEHAVIOR-BY-DIFF EEZZ CONF2 SOLVENTH3
  83.             SIMPLUS RECTZTO%PI2 LHOSPITAL M2 $RESIDUE PCETIMES1 COLEXPT
  84.             PALGSIMP MAXIMA-SUBSTITUTE REFLECT0 DSUBSTA PDECRED
  85.             BOTH-SIDE PCOEFADD ALLSUBST00 MINVARLIST-MRAT ISGEO1
  86.             SIGNDISCR EVERYSUBST00 EVERYSUBST TMRATCONV SP2INTEG12 INTI
  87.             SP2INTEG13 TMEXCHANGE PCSUB2 KANSEL SP3SUBST SPC5B PCSUBST
  88.             $POWERSERIES EVERYSUBST0 CF SP2INTEG WTPTIMES TMNOMOREUSE
  89.             SUBSTFORSUM EVERYSUBST1 RATDP2 AR$*S SP2DIFF1 SP2DIFF2
  90.             TRAMP3$-M TRAMP3$-F SRATSUBST PELSO1 PSP2FORM TR-MASET
  91.             DPREMQUO SP3SUBSTP1 SIMPEULER SIMPDERIV SIMPSIGNUM DPDIF1
  92.             SIMPBERN TR-MACSYMA-USER-FUNCTION-CALL DEQF TFGELI0
  93.             SIMPBUILDQ DIAGMATRIX MAKE-OPERATION REPLACEROW PART*
  94.             SIMPFACT SIMPGFACT SIMPSUM BESSEL SIMPMDEFMACRO LINEARIZE3
  95.             PARTITION FPSCAN SIMPTIMES FPINTEXPT DEFS1 ATAN-POLE1 BYDIF
  96.             MLISTCAN-$ALL MACSYMA-TRACE-SUB INTCV2 MSZ-MQAPPLY
  97.             TRACE-FSHADOW MSIZE-LIST MSZ-MDEF MSZ-MEXPT CPUT SMONOGEN
  98.             MSZ-MTIMES GFACT MSZ-MCOND COEFSOLVE MSZ-MDO MSZ-MDOIN
  99.             SOLVE MSZ-MPLUS PSDISREP2 INTCV3 $RATSUBST EXPSEC-FUNS
  100.             ARRSTORE-EXTEND RES1 RESIDUE SIMP-%SINH POLELIST SIMP-%ACOT
  101.             INTSUBS EXPASIN-FUNS SIMP-%ASECH SIMP-%ACSCH PTTS1
  102.             SIMP-%ACOTH SIMP-%ATANH LOADFILE SIMP-%ACOSH AL1 ROOTADDUP
  103.             NROOT1 PUTPROP SIMP-%ASINH COT-PLUS SIMP-%ASEC TAN-PLUS
  104.             SIMP-%ACSC PINTERPOLATE6 SIMP-%ACOS SIMP-%ASIN SUBST41
  105.             SIMP-%SECH SIMP-%CSCH SIMP-%COTH SIMP-%TANH ISOLAT
  106.             SIMP-%COSH ASK-PROP PUT-MODE ASS-EQ-SET RATLOG PGCDP
  107.             PGATHERCOEF NROOTS SIGNAL-MODE-ERROR SUPEREXPT DECLVALUE
  108.             MONSTERTRIG WTPCTIMES1 DECLMODE STURMAPC WTPTIMES1
  109.             VERIFY-AS-SUBR-ARGUMENT-LIST BOOLEAN-CONVERT RESOLVENT
  110.             PASIMP1 MBIND E3PROG EPROGRATD MEVALP_TR 
  111.             $ARRAYSETAPPLY MEVALP1_TR INSURE-ARRAY-PROPS
  112.             STORE-INTERNAL-1D COLLISION-LOOKUP MPUTPROP INHERIT-PROPL
  113.             MEMBERROOT BAKALEVEL1 BAKALEVEL SET-LBP-AND-RBP COMMONROOTS
  114.             TRACEMOD1 PEXPTMOD CPBGZASS ZASSG SPC5 COEFVEC PRESULTANT
  115.             NISLET NISTREEBUILDER TS-FORMULA PSCDIFF LTERMVEC COLOUT
  116.             ADDVARDEG PRSNARY TFGELI1 MEVALP2 IS-MOR_TR IS-MAND_TR
  117.             IS-MNOT_TR DSKDEFPROP MARRAYSET1$ INTERVAL-ERROR
  118.             $INTERPOLATE_SUBR COLLISION-CHECK AVLINSERT $POISMAP
  119.             POISSUBSTA TSPRSUM POISMERGEC POISMERGES POISMERGE MERGE11
  120.             PSDISEXCNT SYMBOLIC-EXPAND POISSUBSTCO GET-LEXP POISMERGESX
  121.             POISMERGECX MULTIPLE-%PI EXPTAN-FUNS A-ATOM TESTA
  122.             TRY-LHOSPITAL-QUIT DVCOE COEFFP COEFFPT COEFFT ZEPOW
  123.             USE-OLD-CONTEXT SIMPLIM$PSI SIMPLIM$LI TESTA* NEWVARMEXPT
  124.             MKILL SIMPLIMSC MFACT DSTRB DRAW-LINEAR MABS-SUBST SINCOSHK
  125.             SUBSCS SUBSC RATSIMP ADD2CSTR EXPFACTOR DEG-LESSP SIMP-%TAN
  126.             IN-INTERVAL META-MPUTPROP META-PUTPROP ATAN-POLES LOGX1
  127.             INTCV INTCV1 $MINOR MINOR SIMPMIN DIAGLIZE1 SIMPSQRT
  128.             SIMPMQAPPLY SIMPMDEF SIMPMATRIX SIMPLAMBDA SIMPEXP LISIMP
  129.             DISREP-MONOM ZTORAT SIMPBIGFLOAT SIMPARGS1 EXPLIST
  130.     t        SIMP-LIMIT SUBSTINT GENNEGS NOUNLIMIT LIMIT-CONTEXT
  131.             CHECKDERIV1 BEHAVIOR SCE-INT SUBFUNMAKE SIMPLIMIT
  132.             $ROMBERG_SUBR LIMIT1 PTORAT TFGELI SIMP-%ATAN PIVOT
  133.             DIMCHECK GET-NEWEXP&FACTORS DGRF $PUT SIMPABS TRY-LHOSPITAL
  134.             CPA RADLIM DLSF SP1PUTBUC)) 
  135. (DECLAIM
  136.     (FTYPE (FUNCTION (T T T T) T) MAPPLY1 LIMIT2 SIMPLIMEXPT SP1ADDBUC Z2
  137.             REMOV2 REMOV1 $CHANGEVAR MDEFCHK LIMIT ONEN $TMLIN TMLIN
  138.             KILL2 TIMER-MLIST LAGRANGE3 LAGRANGE33 PSTIMES*2 ORDLIST
  139.             SIN-COS-INTSUBS POWEROFX DINTEGRATE RES MERGE-SOL-LIN-Z
  140.             ONE-STEP SIGNDIS3 TRIVIAL1 DEN1DEN1 DEN1 CASE0 POLFOO CASE1
  141.             FACT2Z ZFACT PART1 RESM0 DSKSTORE MPROPSCHK DSKARY PHI
  142.             GCTIMES CXERFARG PSMONSUBST COMPLETEVECTOR PROP1 CDIVID-SL
  143.             SIMPPROD1 LOGNX2 DERIVAT COMDENOM1 METHOD-BY-LIMITS
  144.             RESPROG0 INITIAL-ANALYSIS PARSE-INTEGRAND SOLVEX EXTEND
  145.             GGRM1 ZMTORAT SOLVESPEC1 $DEFINT INTERPOLATE-CHECK
  146.             DEFINT-LIST TAKE-PRINCIPAL $LDEFINT LIMFACT2 PCSUB1
  147.             SP3SUBSTPN TMLATTICE EVERYPTERMS AR$GCALL2$ CFFUN
  148.             SRINTEGEXPD CONF1 SUMSUM ATOMAT SIMPSUM1 SIMPSUM2 FREESUM
  149.             DEFA1 DEFINT MSZNARY DECLARE1 DIFAPPLY MSIZE-FUNCTION LIMCP
  150.             DINTBYPART COT-TIMES METHOD-RADICAL-POLY MONICGCD
  151.             FANCYPOIS1C TAN-TIMES FANCYPOIS1S PSDP2 PINTERPOLATE5
  152.             COMPATVARLIST REFINE RATROOT PEXPT2 ENPROG OTRACEMOD
  153.             CPTOMEXP EVERYPTERMS1 MATOUT DSKGET DSKSETUP PSDERIV1
  154.             PSFLOAT1  COEFFRET $TLDEFINT SUBSTPART-TRANSLATION
  155.             COEFFTT SIMPLIMFACT SER0 MDATA COEFFPORT KILL3 SP2INTEG2
  156.             MAKE-PARSER-FUN-DEF SOLCOEF GAMMA1 PWTAYLOR COMPATVARL
  157.             FORMX POLES-IN-INTERVAL LIMIT-POLE $SETELMX SUBARGCHECK
  158.             MAKE-LIMIT-ASSUMPTIONS SPDERIVATIVE1 NEWMAT COMPLEXITY/COL
  159.             COMPLEXITY/ROW ZEROP/ROW MAYBE-BREAK SET-LINEINFO)) 
  160. (DECLAIM
  161.     (FTYPE (FUNCTION (T T T T T) T) MLAMBDA EXPLOG-FUNS MAKE-ASSUMP MOVECOL
  162.             INTSUM1 RATRAD MOVEROW CPA-INDETERM REMOVE1 SC^N
  163.             OUTPUT-TEXT* MDEFARRAY XRUTOUT $EMATRIX BMHK TMUNPIVOT
  164.             TMINOR PSDERIV2 EXPEXP-FUNS LINHACK SPARSE-LIFT ZGCD-LIFT*
  165.             DENN NUMN CASEGEN TRUFAC COMPOSE MOSTPART EZ1CALL
  166.             EXPPOLYCONTROL RISCHEXPLOG MPART GET-SERIES PFRNUM
  167.             DECOMP-CHAIN PRINCIPAL-VALUE-INTEGRAL FAN SIGNDIS2 SBSTPT
  168.             DEN1DENN NOCONSTQUAD DEN1NUMN NONCONSTQUADENUM DOSUM DIFFHK
  169.             EXPCOT-FUNS DIFAP1 PSDP1 FANCYPOISSUBST CSCSEC-PLUS
  170.             SINCOS-PLUS A-DEF-PROPERTY DECOMP-TRACE INFOSTORE MSIZE)) 
  171. (DECLAIM
  172.     (FTYPE (FUNCTION (T T *) T) NLEFT STRING-SEARCH $FORTMX
  173.             REARRAY-AUX BATCH-EQUAL-CHECK PARTFRAC CHEKVALUE DELQ
  174.             MARRAYSET *ARRAY ZL-REMOVE $MATCHFIX ZL-DELETE
  175.             DISPLAY-FOR-TR MAPLIST_TR CL-*ARRAY SOLVABLE MARRAYREF
  176.             LIST-REF PUMP-STREAM RENAME-TF $SUBSTITUTE FIND-CF1
  177.             TRANSLATE-FILE)) 
  178. (DECLAIM (FTYPE (FUNCTION (T T T T T T FIXNUM T T T T) T) PSEXPT1)) 
  179. (DECLAIM
  180.     (FTYPE (FUNCTION (T T T T T T T T T) T) PP-INTIR1 PP-INTIR1-EXEC
  181.             MM-INTIR1-EXEC INTIR1-REF PM-INTIR1 MM-INTIR1)) 
  182. (DECLAIM (FTYPE (FUNCTION (T T T *) T) WARN-MODE)) 
  183. (DECLAIM (FTYPE (FUNCTION (T T T T T T T T T T T T) T) DEF-OPERATOR)) 
  184. (DECLAIM (FTYPE (FUNCTION (T T T FIXNUM FIXNUM FIXNUM) T) DSUMPROD)) 
  185. (DECLAIM
  186.     (FTYPE (FUNCTION (T T FIXNUM FIXNUM FIXNUM T FIXNUM FIXNUM FIXNUM)
  187.                 T)
  188.             DRATIO)) 
  189. (DECLAIM (FTYPE (FUNCTION (T T FIXNUM T) T) X**Q1 POLYIZE)) 
  190. (DECLAIM
  191.     (FTYPE (FUNCTION (T T FIXNUM FIXNUM) T) D-MATRIX SINGP PRODHK)) 
  192. (DECLAIM
  193.     (FTYPE (FUNCTION (T T T T T T T T) T) PNS-INTIR3 TMPERMUTE TMMOVE
  194.             PSMONSUBST1)) 
  195. (DECLAIM (FTYPE (FUNCTION (T T T T FIXNUM T T) T) PSEXPT-FN1 PSLOG1)) 
  196. (DECLAIM (FTYPE (FUNCTION (T T T T T T T) T) ZS-INTIR3 MPC NUMMNUMN)) 
  197. (DECLAIM
  198.     (FTYPE (FUNCTION (T T T T T T) T) INTIR3-R0TEST INTIR3-REF
  199.             DENMDENN DENMNUMN CSCSEC-TIMES SINCOS-TIMES MPC1 DIMNARY
  200.             PSPLUS2 PSDIFF2 ZGCD-LIFT NUMMDENN FILL-ROW)) 
  201. (DECLAIM (FTYPE (FUNCTION (T T FIXNUM) T) TB2 CPBG)) 
  202. (DECLAIM (FTYPE (FUNCTION (FIXNUM FIXNUM) FIXNUM) DBA DBV)) 
  203. (DECLAIM (FTYPE (FUNCTION NIL *) MBREAK-LOOP BREAK-CURRENT)) 
  204. (DECLAIM
  205.     (FTYPE (FUNCTION NIL T) PARSE-ERR $RESET MTERPRI RUNTIME
  206.             EXP-PT-ERR ESSEN-SING-ERR TAY-DEPTH-ERR $TR_WARNINGS_GET
  207.             $LOGOUT CONTINUEP SUPUNBIND FPPI1 TYI* FPONE $QUIT MFILE
  208.             RESTORE2 RESTORE RESTORE1 POP-LOOP-CONTEXT NC-ERR GCCON1
  209.             $PRINTVARLIST GENREF PRINCIPAL $CLEAR_RULES MAIN-PROMPT
  210.             BREAK-PROMPT $CLI MACSYMA-TOP-LEVEL THROW-MACSYMA-TOP
  211.             $CLOSEFILE ROMB-TIMESOFAR MSUBLIS-SETUP RECOVERORDER2
  212.             MSUBLIS-UNSETUP RECOVERORDER1 MUNLOCAL BACKWARD PRINTLABEL
  213.             DISPLAY* $ERRORMSG $CLEARSCREEN CONTEXT-UNWINDER PROPG FUU
  214.             DQ- INFIN-ORD-ERR TMINITIALFLAG TMSORT1 TMHEADING DQ+
  215.             COMPILE-FORMS-TO-COMPILE-QUEUE-NOW GCCON SET-UP-TRANSLATE
  216.             TERPRI* NEW-COMMENT-LINE PRINT-TRANSL-MODULES NEW-ALG
  217.             $UNORDER FIND-LISP-READTABLE-FOR-MACSYMA
  218.             SET-READTABLE-FOR-MACSYMA GETRISCHVAR GETOPTIMVAR OPT-ERR
  219.             NOR-ERR PRINTNET COMPILER-STATE NEXTK-SL NEW-END-SYMBOL
  220.             CALCSC-SL QUADSD-SL CAUCHY-SL SCALE-SL NEXTH-SL CALCT-SL
  221.             POLYEV-SL UPDATE-GLOBAL-DECLARES FORGET-GLOBAL-ASSUMPTIONS
  222.             MAKE-GLOBAL-ASSUMPTIONS RESTORE-ASSUMPTIONS CONTEXTMARK
  223.             KILLALLCONTEXTS CLEAR CLEARSIGN QUADIT-SL NEWEST-SL
  224.             MATCHERR NILL GAUSS $LOAD_SEARCH_DIR
  225.             INITIALIZE-$FILE_SEARCH CHAR-LIST-SYNTAX-ON
  226.             CHAR-LIST-SYNTAX-OFF GENSUMINDEX FPPI FPE DIVERG KINDP34
  227.             DBZ-ERR GOBBLE-COMMENT MAKE-PARAM PEEK-ONE-TOKEN SPC0
  228.             INIT-BREAK-POINTS CURRENT-STEP-FUN RESTORE-BINDINGS $BT
  229.             SCAN-MACSYMA-TOKEN UNFAM-SING-ERR PARSE-TYI PARSE-TYIPEEK
  230.             SCAN-LISP-TOKEN SCAN-ONE-TOKEN GOBBLE-WHITESPACE DSKSAVE)) 
  231. (DECLAIM
  232.     (FTYPE (FUNCTION (*) *) SAVE-LINENUMBERS CONTINUE-MAXIMA $FRAME
  233.             BREAK-QUIT $SYSTEM)) 
  234. (DECLAIM
  235.     (FTYPE (FUNCTION (T) *) BREAK-DBM-LOOP LISP->LISP-TR-LAMBDA
  236.             TR-LISP->LISP TRANSLATE-FORM  DETERMINANT1
  237.             TRANSLATE-AND-EVAL-MACSYMA-EXPRESSION FASLP $UNKNOWN
  238.             GETFUN-LT CSIGN FREE-LISP-VARS TRANSLATE-FUNCTION
  239.         ))
  240.  
  241. (DECLAIM
  242.     (FTYPE (FUNCTION (T) t) 
  243.              MEVAL1 DETERMINANT1
  244.              $BFLOAT CSIGN FREE-LISP-VARS
  245.             *BREAK-POINTS* LIMUNKNOWN PFLOATP))
  246. (DECLAIM
  247.     (FTYPE (FUNCTION (*) T) $TLIMIT $LIMIT $DELETE $GCD LIMIT-LIST
  248.             $EXPAND $RAT BARFO SUM-VAR-SETS TR-TELL $KILLCONTEXT
  249.             MAKE-DISP-HACK-OB $FACTS $DEACTIVATE DEACTIVATE $ACTIVATE
  250.             ACTIVATE FMAPL1 $GENFACT ADD* LISPM-MERGE-PATHNAME MTELL
  251.             MUL* $SORT LINEL MAKE-BKPT STEP-INTO STEP-NEXT
  252.             MAKE-LINE-INFO DBM-READ $SCONCAT $BACKTRACE TRACE-MPRINT
  253.             ADD $RATWEIGHT $RATVARS $TAYLOR $FREEOF $MATRIX $REMAINDER
  254.             LIMIT-NO-ERR $QUOTIENT $MOD $RATSIMP GET-LIMIT $FULLRATSIMP
  255.             MAKE-MGENARRAY $UNTELLRAT $MAKE_ART_Q MCALL $POISSUBST
  256.             $REALROOTS $ASKINTEGER $HORNER $NROOTS SCAN-STRING
  257.             RETLIST_TR MAP1 $INTEGRATE FPMAX FPMIN $CONTEXT $RANDOM
  258.             $MIN $MAX $TELLRAT $CONTENT $SCSIMP ERRRJF TR-GENSYM MUL
  259.             $FACTOR $SUBMATRIX $FILENAME_MERGE $DEMO $READONLY $PRINT
  260.             $READ $TRIGREDUCE MERRBREAK $BREAK CONCAT X$-CL-MACRO-READ
  261.             $ALLBUT OUTERMAP2 MFORMAT $ERROR MFORMAT-SYNTAX-CHECK
  262.             MFORMAT-TRANSLATE-OPEN $PAUSE $FACTOROUT AFORMAT MMAPCAR
  263.             CONTEXT $BDISCR $ALGFAC $PERMANENT $NEWDET $TMLINSOLVE
  264.             $TMNEWDET NPRINC* MREAD-NOPROMPT TYI TYIPEEK MREAD
  265.             CURSORPOS $MULTTHRU $REMBOX $BOX $LPART $DPART $CONCAT
  266.             $ADDCOL $ADDROW $GENMATRIX EXPO LAPPROD LAPSUM FACTOR $DIFF
  267.             OUTERMAP1 SCANMAP1 $DIVSUM $DEPENDS $INPART $EZGCD $PART
  268.             $DISPFORM $COEFF $APPEND LOAD-MACSYMA-MACROS-AT-RUNTIME
  269.             $DISP $REST $LDISP ASS-EQ-REF MAKE-TSTACK-SLOT $DIVIDE
  270.             $RATCOEF)) 
  271. (DECLAIM (FTYPE (FUNCTION (T FIXNUM FIXNUM *) T) D-VBAR)) 
  272. (DECLAIM (FTYPE (FUNCTION (T FIXNUM FIXNUM FIXNUM T) T) D-BOX)) 
  273. (DECLAIM (FTYPE (FUNCTION (T FIXNUM *) T) D-HBAR)) 
  274. (DECLAIM (FTYPE (FUNCTION (T FIXNUM FIXNUM T) T) MTOA RITEDIV)) 
  275. (DECLAIM (FTYPE (FUNCTION (T FIXNUM T) T) COLROW0)) 
  276. (DECLAIM (FTYPE (FUNCTION (T FIXNUM T T) T) MINORL)) 
  277. (DECLAIM
  278.     (FTYPE (FUNCTION (T FIXNUM FIXNUM) T) X**Q ECHELON2 TRIANG2
  279.             DRAW-2D NEWINV)) 
  280. (DECLAIM (FTYPE (FUNCTION (T FIXNUM FIXNUM FIXNUM) T) ZROW)) 
  281. (DECLAIM
  282.     (FTYPE (FUNCTION (T) T) PACOEFP DISREP ATAN2NEGP ILT3 LAPDEFINT
  283.             $SIGN ILT0 INCRLIMK ATVARSCHK FACT5 RAINV MOPP LAPLUS GETOP
  284.             LAPLACE $MATRIXP FPENTIER LAPTIMES CPTIMESX WTPTIMES2
  285.             REMSIMP $TRUNC CFACTOR HORNREP PUTODR LAPERF ELABEL INLIST3
  286.             LAPINT DISP2 LAPDIFF MSPECFUNP CRECIP $PFET SSSQFR $REVERSE
  287.             LAPLOG $DISPTERMS $TOTALDISREP SOLVECASE MEQUALP $FIRST
  288.             SNUMDEN RULEOF EXPONENTIATE OPTIONP $ELLIPTK1 $LAST ROT*
  289.             $LENGTH MNEGP $ELLIPTK $RATDISREP $ELLIPTE1 $RATP $ELLIPTE
  290.             $ATOM $PRIME DERIV $TOTIENT $SYMBOLP RTZERL2 $ARGS IMODP
  291.             LEADOP $NUM PMINUSP $RATNUMER DERIVDEG1 RISCHLOGDPROG
  292.             EVTILDEGLESS PSUMSQ RISCHFPROG SUBGEN $GCFACTOR ATSCAN
  293.             GCDISP AT1 LISTOVARSL RISCH-CONSTP ERECIP DECL-REALP
  294.             MINLIST MAKE-SWITCH-LIST DONTFACTOR MAKE-LONG-LIST READLIST
  295.             EVNUMP PFACTORANY PKRONECK $INTEGERP PS-INFP PFACTORQUAD
  296.             MNLOGP REVSIGN $EVENP LISTOVARS0 $TAYLORP *KAR TAY-ORDER
  297.             INCREMENT-TRUNCS EDISREP $NUMFACTOR SRDIS ORDHACK
  298.             PSLOG-MONOM LIST-STRING SIMPLN1 MAXIMA-COPY-REST TESTTNEG
  299.             MAKE-DEFINT-ASSUMPTIONS ZL-CHAR ORDER-LIMITS PSQFR
  300.             EXTENDED-NUMBER-P I-$REMOVE *RED1 TSBASE-COMB
  301.             MACSYMA-READ-STRING SFORX SEVN EVEN1 LI2NUMER TSEXPT-RED
  302.             CHEBYLI2 SIN-COS-INTSUBS1 CHEBYS12 MAKNAM TESTP E1-
  303.             CHEBYLI3 PARTITION-NS MNLOG OSCIP TESTT MGENARRAY-AREF
  304.             MGENARRAY-ASET SUBFUNSUBS MGENARRAY-TYPE POLE-ERR
  305.             MGENARRAY-NULL SUBFUNNAME MGENARRAY-GENERATOR SRCONVERT
  306.             MGENARRAY-CONTENT EXPLODE |RETLIST-aux| EXPLODEC TANSC
  307.             FUNCTION-ARRAY-P SCPROD STRING-FROM-CHAR-LIST PLYGAM-ORD
  308.             SSP MAPATOM FPART LGCTIMES ABLESS1 LOGCONCOEFFP LOGCON
  309.             REMBOX1 LGCPLUS LGCSIMP ZTO1 GEN-POINT BOX-LABEL LGCSORT
  310.             THRAD CREATE-LOBJS BATAP CLEAR-LOBJS $COPYMATRIX BATAPP
  311.             LGCSIMPLEP $SQFR $COPYLIST IGPRT $FIBTOPHI GGRM BATA0
  312.             FREEVAR MAXCOEFFICIENT MAKE-LINSOLS NORM NISREMLET POLY->PS
  313.             KILL1 FOR-EVAL-THEN-QUOTE NISPERMUTATIONS
  314.             FOR-EVAL-THEN-QUOTE-ARGL TMLINSOLVE DECLARE-SNARF
  315.             NISNEWLIST INVERT-TERMS PS-INVERT-VAR TMMAXP PSEXPT-FN-SING
  316.             CMARK CUNMRK LOG-ABS-TVAR NISINNERNULL KILLFRAME NEG-MONOM?
  317.             REMOVE-TYPE NISNUMBERPICKER NEWCON LIM-PLUSP
  318.             ENSURE-A-CONSTANT-FOR-MEVAL NISEXTRACT EMIT-DEFUN NISKERNEL
  319.             COMPILE-FUNCTION TVAR-LIM TLIST-MERGE MACSYMA-FSYMEVAL
  320.             ORDER-VARS-BY-STRENGTH SRDISREP $LOGARC PSDISREP MEVAL*
  321.             PSDISEXPAND MACSYMA-FSYMEVAL-SUB SETUP-MULTIVAR-DISREP
  322.             DELETE-OLD-AND-OPEN $TAYLORINFO
  323.             INSERT-NECESSARY-FUNCTION-DECLARES PRINT* PARSE-TAY-ARGS
  324.             SUB-PRINT* FIND-TLISTS MOPSTRINGNAM FINDTL1 TRACE-FSYMEVAL
  325.             PSDP PSFIND-S1 TRACE-PRINT PRINC* MICRO-TO-SEC PRINT-MODULE
  326.             PRINT-TRANSL-HEADER MACSYMA-TIMER SP1TIMES SP1UNTREP SP1ADD
  327.             MACSYMA-UNTIMER TRIGFP GCDRED PGCDEXPON NORM1 SP1TLIN1
  328.             RDIS* GOOD-FORM BAD-FORM READ-COMMAND-TOKEN ALGPGET
  329.             READ-COMMAND-TOKEN-AUX UCONTENT REMCOMPARY ALGNORMAL
  330.             PRED-REVERSE PFACTOR1 RCONTENT CH-MINUSP OLDCONTENTA
  331.             CONTSORT PARSE-NOFIX CHANGESIGN I-$STORE COEFL PCONTENTZ
  332.             PARSE-BUG-ERR PSPLIT-FIELD INFOLSTCHK FINDSIGNOFACTORS
  333.             DELIM-ERR MAXCOEF1 FILELENGTH NEWPRIME UNKNOWN FNEWPRIME
  334.             LISTARGP $PRIMEP ATOMVARS ADJOIN-SING-DATUM PREMTERM-ERR
  335.             LEADCOEFFICIENT *MMINUS RATWTSETUP $COS FIXEXPAND
  336.             $LISTOFVARS TMS-FORMAT-PRODUCT FUMCHECK TSTACK-SLOT-P $ASIN
  337.             PARSE-CONDITION NONEG TIMEORG $FLOATNUMP $DEBUGMODE
  338.             MMINUSP* PARSE-$DO MAXLIST $POISSIMP PARSE-TAY-ARGS2 DISPLA
  339.             PARSE-TAY-ARGS1 MAKELABEL TWOARGCHECK CHECKLABEL PFACTOR11
  340.             OPERATORP GETOPR FACTOROUT CHECKFLAGANDACT EXTRACTVARS
  341.             MOPSTRIP SIMPLEXPON TSTACK-SLOT-MODE MAXIMA-CONSTANTP
  342.             TSTACK-SLOT-TBIND SIMPNRT1 ORD-VECT1 TSTACK-SLOT-VAL-MODES
  343.             PSMINUS-TERMS TSTACK-SLOT-SPECIAL ZIREDUP LISTOF0S
  344.             POISPZERO TAGIRR INTOPOISCO CHECK-OUT-OF-CORE-STRING HASVAR
  345.             POLYST INTBASEHK $FACTORSUM $COSH POISMAP ONEVARP BASELIST
  346.             NONZERP |MDEFPROP-aux| POISSUBST1C PMAKE ISO1 DDIV ARRFUNP
  347.             POISSUBST1S ISO2 $SQRT FINDIBASE MGEN2 POISCHANGESIGN $SINH
  348.             LCPRODL CFACTORW MATCHECK UNTREE PIRREDP UNTREE1 PRLAB
  349.             FACTOR1972 POISENCODE $CSC FACTOR72 CHECKENCODE HASHER CNTP
  350.             1P CSF $SEC POISCOSINE CONDENSE MULTFACT PAINVMOD SIMPLE
  351.             POISNEGPRED $COT NEWSYM FPCONTENT PROPERTIES ALG $TAN
  352.             POISDECODEC MAKPROD1 POSIZE DISPATVALUES $ATAN PUREPROD
  353.             POISSINE DISPATOMGRADS DISPGRADEFS MLOCAL-AUX CSQFRP TRIMF
  354.             DISPMATCHDECLARES PFLATTEN ARGSUBST MFACPPLUS SPLIT2
  355.             $INTOPOIS PRIMCYCLO PFACPROD FACTXN+-1 CYCLOTOMIC
  356.             POISSUBSTCO1 LOWDEG PSTRUNC MAKSYMP MAKSYM FACTXN-1
  357.             LET-MACRO-GET-LAST-VAR POISCDECODE CHOOZP FACTOSIMP
  358.             FACTXN+1 FACT5MOD GETSIGNL PABS DIVISORS CPBERL LOGTWO
  359.             UNMRK PMONICIZE FRAC DINTNUM ESTCHECK %E-RIGHT-PLACEP
  360.             $PRINTPOIS DINTERN KNOWN-PS %EINVOLVE01 NONPERIOD SEMANT
  361.             ARRFIND POISDIF4 INTOPOIS DBNODE POISINT4 DB-MNUMP MARKS
  362.             MARK MARKP NODEP PSPLIT-FIELD1 PRODND RFORM PLSOLVE
  363.             GET-ARRAY-POINTER GAMMAFLOAT LMAINVAR DO-GAMMAFLOAT GAMMA
  364.             PCOEFVEC ONEP1 ERF PSEXPON-GCD PASCAL PSFIND-S TMLATTICE1
  365.             GAMMARED ADD-LINEINFO LIST-OF-MLISTS TMREARRAY $OUTOFPOIS
  366.             FORM-MRAT FIND-STREAM PSEXPT-FN2 FORM-MEXPT RED-MONO-LOG
  367.             FORM-MTIMES TSTIMES NEWVAR1 FORM-MPLUS $XTHRU RDIS1
  368.             $RATEXPAND RATDISREPD PSEXPT-FN MARKND STRIPTIMES
  369.             TMDEFARRAY RAT->PS ISTRENGTH |DSKSETQ-aux| SIGNDIFF RATMIN
  370.             MEVALN HYPEREX0 MDEFLISTP FALSEP HYPEREX1 I-$REMVALUE
  371.             GET-FREE-INDEX TRUEP ISMAX $SUMCONTRACT SUMCONTRACT1
  372.             MDEFPARAM $BASHINDICES UNTRUE SUMCONSIMP TRUE* LINCHK
  373.             REMRULE NUMDEN* $NICEINDICES REM-VERBIFY LOAD-FILE SER1
  374.             MAKEALIAS IS-MOR POFX MEVALP RDFACT MAKSTRING SIGN CONSTLAM
  375.             CASIFY-EXPLODEN FACTOR-IF-SMALL MPARAMS IS-MAND
  376.             MREDEF-CHECK CARFILE SIGN1 PRINL SP1KGET REMPROPCHK
  377.             REMOVE-TRANSL-ARRAY-FUN-PROPS REMOVE-TRANSL-FUN-PROPS
  378.             IS-MNOT KILL-OPERATOR MACSYMA-UNTRACE GETLABCHARN SP1EXPT2
  379.             SP1LOG2 $GAMMA VISIBLEP SP1TRIGEX BIGFLOATM* ADDLABEL
  380.             AUTOLDCHK SP1TRIG NUMER DSKRAT NEGP COMPSPLT SP1LOG CSCH
  381.             FORGET1 CSC MSETQP COTH HARRFIND COT ROOTFAC |:SPREAD|
  382.             REMORDER ATAN1 POLYINT MQAPPLY1 MUNBIND SIGN-ODDINC
  383.             POLYINT1 ASECH ADDMLIST ASEC POLYINT2 ACSCH BBSORTEQNS ACSC
  384.             NPASK FSTRINGC PUTORDER ACOTH MNUMP ACOT ORDERPOINTER
  385.             $EXPONENTIALIZE IS-BOOLE-CHECK %PIARGS-SINCOS CONSTANT
  386.             OPTIMIZE-PRINT-INST LOGMABS PROCESS-MESSAGE-ARGUMENT DPROG
  387.             LINEARIZE EVERYSECOND %PIARGS-CSCSEC SOLVELIN SQRTX^2-1
  388.             ROUNDRHS LIN-MEXPT $LISTP LIN-MTIMES PRE-ERR LIN-MPLUS
  389.             MIDPNT SQRT1-X^2 RHALF SQRT1+X^2 KILLVARDEGSN SEC
  390.             SCAN-NUMBER-EXPONENT CONSTACL PCONSTP MAXCOEF
  391.             SCAN-NUMBER-AFTER-DOT DBZ-ERR1 SCAN-NUMBER-BEFORE-DOT
  392.             OBTAINABM POS OBTAINAB TAYAPPROX %PIARGS-TANCOT MAKE-NUMBER
  393.             CPBER1 ROUNDROOTS1 FIXUPREST MHEADER LINOUT
  394.             PFREEOFMAINVARSP IREDUP FIRSTCHARN RATDENOMINATOR $RADCAN
  395.             PFLAT1 ALGSYS GETUNHACK ALGSYS0 KNOWNFACTORS LOFACTORS PGET
  396.             OP-SETUP $COMBINE MSTRINGP FRPOLY? CALLSOLVE CHANGEVAR
  397.             TRACEMOD PARSE-PREFIX SIMPLEXP RPOS RATNUMERATOR
  398.             MINIMIZE-VARLIST LFIBTOPHI PMINUS MEMQARGS RADCAN1
  399.             FIXEDMATCHP MONIZE D-PRODSIGN PMOD EMIT MAKESTRING
  400.             SORT-POLES GFSPLIT FMP1 LINEAR-DISPLA ATOMSON RMCONST1
  401.             NMTERMS PROC-$DEFMATCH PRINCIP FLMAXL ALLATOMS P*PIN%EX
  402.             FLSORT PROC-$TELLSIMP PIN%EX SPC7 %TO$ D-SUMSIGN
  403.             PROC-$TELLSIMPAFTER RJFSIMP PROC-$DEFRULE
  404.             PROC-$MATCHDECLARE SUBFUNARGS %ETOLOG TRANSPOSE-ELS
  405.             NISLETSIMPRAT $NONSCALARP ZEROLP DISREPLIST1 REPLIST1
  406.             NISLETSIMP INTSET1 EXACTONLY $ECHELON NEWVARMAT1 CALLAPPRS
  407.             CHECK SIGNUM1 RFLOT RISCHFORM PUNIVARP $ODDP FINDLEASTVAR
  408.             INTEGERP2 KILLVARDEGSC RATSQRT GETALIAS RISCH-PCONSTP
  409.             GETVARDEGS MMMINUSP PTIMEFTRS FIXINTGREAT NO-SING-ERR
  410.             SUBVAR SCAN-TOKEN FILENAME-FROM-ARG-LIST DISTREP RAT1
  411.             CONDENSESOLNL EPROG CHECK-DIMSTRING $WRITEFILE SRCONVERT1
  412.             RATFIX D-INTEGRALSIGN FILESTRIP RISCHLOGEPROG TRIG1 LPOS
  413.             SIMPLIMPLUS1 PSDISEXTEND RAT8PRIME RBP $ED COMPLEXNUMP RAT8
  414.             SET-UP-CURSOR LBP INTFACTOR CONDENSESUBLIST SIMPLOG
  415.             CONDENSEY SIMPAB COMBINEY INTEGRATE1 HLINSOLVE APROG
  416.             ALIASLOOKUP RISCHLOGPOLY PTERMVEC HIDELIMA
  417.             MAYBE-BOOLE-CHECK SUM-OF-INTSP FASPRIN SUBST10 LISTGCD
  418.             SIN-SQ-COS-SQ-SUB PARSE-MATCHFIX RAT10 MEVAL SIMPLIM%ACOSH
  419.             CHECKSIGNTM REMABS UNSTOREP  RIDOFAB
  420.             MARRAY-TYPE LEADARG FANCYPAC $SECH
  421.             GETFNSPLIT GVAR-LOGP INTEGRALLOOKUPS MAKNUM SIMPLIMTIMES
  422.             EXPLODEN ZEROP2 $SIN GETMINOR HALVE DILOG GET-LINEINFO
  423.             $COTH SEPARC LIM-IMAGP INTFORM MARRAY-TYPE-UNKNOWN RATLIM
  424.             PNEXT1 SUBSTINT1 PQR TRUE FANCYPAS TLIMP $TANH RISPLIT
  425.             TAYLOR_SIMPLIFIER_CALLER GETLIMVAL SET-FULL-LINEINFO CV
  426.             DENOMFIND RATFNT SIMPINF LOAD-AND-TELL ABSARG $LISTARRAY
  427.             LINE-INFO-LINE SUBST4 $POISSQUARE ABSARG-MABS BKPT-FILE
  428.             TO-MACSYMA-NAMESTRING REFLECT BKPT-FILE-LINE LISTARRAY
  429.             SIMPLIM%ATANH SET-ENV LIM-MINUS COVERSINEMYFOOT P11 TANSC1
  430.             MACSYMA-NAMESTRING-SUB $CABS MQAPPLYP ADD-UP-DEG
  431.             INSERT-BREAK-POINT STURM $CARG ERRSET-NAMESTRING
  432.             |$MDEFVAR-aux| TSPLUS FORWARD SHOW-BREAK-POINT FULLSTRIP
  433.             $TRIGEXPAND REMOVE-BINDINGS RE-TAYLOR NBN FULLSTRIP1 DSRL
  434.             COMPATTLIST ARGNUM MACSYMA-NAMESTRINGP NUM-OF-LOGS
  435.             OPEN-OUT-DSK COMPLEXITY OPEN-IN-DSK NUM-OF-LOG-L LIM-LOG
  436.             RISPLIT-MPLUS ELEMXPT SIGN-MPLUS VARP RISPLIT-TIMES
  437.             ASK-INTEGERP SIGNFACTOR STURMOUT $SHOW_HASH_ARRAY LIM-EXP
  438.             SIGNSUM FINDINGK P1 RATNUMP MIDOUT UPRIMITIVE $BATCHLOAD
  439.             SRF SRATSIMP FINDS SUPERTRIG BKPT-FORM WNA-ERR
  440.             BKPT-FUNCTION SUPERSINX LINE-INFO-FILE PWEIGHT LIM-ABS
  441.             SUPERCOSNX $NUMBERP PDEGREER MAXIMA-INTEGERP LEADTERM IR
  442.             TRIG2 EVOD MAKPOINT UDM-ERR MAKRAT RATIONALIZER MTIMESP
  443.             PMODCONTENT UNIPOLY COMBINEY1 MULTOUT CHECKDERIV PARTFRACA
  444.             MSEEMINGLY-UNBOUND ROOT-BOUND ERRLFUN1 OPTRIG PGATH3
  445.             IR-OR-EXTEND SINNX PGATH1 COSNX POSEVEN BIQUADRATICP
  446.             WTPTIMES3 BIQUADP1 TRANSLATE-PREDICATE TRIGFREE SOLVECUBIC
  447.             RATS ROUND1 TRP-MLEQP ADISPLINE F3 TRP-MLESSP COMPLICATED
  448.             ARCLIST MAXIMA-RATIONALIZE TRP-MGEQP ARCFUNCP TRP-MGREATERP
  449.             SOLVEQUARTIC ODD1 TRP-$EQUAL SUBVARDLG TRP-MEQUAL SIMPLIFY
  450.             LEADALGCOEF FPROG SSIMPLIFYA MMACROEXPAND1 MPLUSP INFSIMP
  451.             FPEND FPATAN NDM-ERR NSM-ERR REM-CONST $SUBVARP LINEARCONST
  452.             FPFORMAT REM-OPERS-P FPROUND TANBIGFLOAT IA-ERR LOGBIGFLOAT
  453.             FPLOG ATANBIGFLOAT MABSBIGFLOAT COSBIGFLOAT DEFA DEFS
  454.             SINBIGFLOAT DEFC FPPOSP DEFC1 FLOATTOFP FIXFLOAT
  455.             ADDBIGFLOAT MODE FPEXP MODEDECLARE-INTERNAL RATBIGFLOAT
  456.             MFUNCTION1 ZEROP1 FPEXP1 FINDP $TRACE_IT TBF MSTRING
  457.             MACSYMA-TRACE FORTSCAN NEG FORTSCAN-MTIMES $UNTRACE_IT
  458.             IMAG-ERR BBSORT1 BX**N+A SAVEFACTORS FINDSUB LOGRED BX**N
  459.             MEVENP $SUM-AUX SAVEFACTOR1 STRSYM FREE1 PRIMEP TDPN $ACSCH
  460.             FINDIT LIM-RECIP TDPOS SCAXN MRETURN SIMPLERD MAKPOLY
  461.             TBOUND-FREE-VARS $MAPATOM TDZERO RATREP* TR-ARGS STRMDO
  462.             STIRLING0 DATUM-LIM DBZS-ERR GENPOLY $ASECH TAYCHK2RAT E1+
  463.             STIRLING DELETMULT TRANSFORM-EXTENDS DEG ALGP STRMDOIN
  464.             DTRANSLATE $EXP EXPPOLY REALONLY MODDP SUM-C*LOGS
  465.             FUNCLOGOR%E RDSGET OPERATORP1 $EXTENDP COEF-SIGN COMPSPLT1
  466.             FLUIDIZE APPRSYS ZP $ACOTH QUOTED-SYMBOLP ALGSYS1 RDTAY
  467.             LOGNXP SPLITPROD $ATANH TELLRATDISP MYCABS
  468.             FOR-EVAL-THEN-MQUOTE-SIMP-ARGL $LOG SPLITSUM CABS PDISREP+
  469.             MMAPEV TR-ARRAYCALL PSEXPT-LOG-ORD SYMBOLS PDISREP
  470.             FACTORNUMBER PFACTOR TRANSLATE EXP-C*LOGS WHICHFN MRATEVAL
  471.             COMPSPLT2 PZEROP EVOD-MPLUS $ACOSH NFORMAT-CHECK ASIN
  472.             $ASINH EVOD-MTIMES ACOS PSMINUS RPTROUBLE ASINH $ACSC
  473.             JOINVARLIST ACOSH $ASEC RATMAX ATANH $ACOT CG-TYO-N MOD1
  474.             LMUL TSEXP-COMB CG-TYO MARRAY-CHECK DBVARP ANTIDERIV
  475.             SIMPLIM%ATAN $ACOS SAV&DEL MEVALATOMS CG-IMAGE-TYO-N SECH
  476.             CG-IMAGE-TYO $GFACTOR RAT0 MMACROEXPAND IND2 MEVAL1-EXTEND
  477.             LITTLEFR1 POLFACTORS TYO* MEVAL-ATOMS NMR C*LOGS NEWVAR3
  478.             NRETFACTOR1 SIMPLIM%ASINH MEVALARGS TRISPLIT $CSCH
  479.             SIMPLIM%TAN PSCONST PUTONVLIST NRATFACT SIMPLIMLN REPLAC
  480.             EVFACT COMPSPLT-EQ GEN-TR-LAMBDA PDISREP*CHK CONSTTERMP IND
  481.             SPECDISREP MLOGP SPECREPP UNMRKS FACTS1 SIMPLIMPLUS
  482.             UNION-VAR-SET $DISTRIB ODNUMP SEMANTICS
  483.             PATCH-UP-MEVAL-IN-FSET PDEGR ISUM LAB KILLC ASYMREDU REMOV
  484.             TELLRAT1 TR-LISP->LISP-DEFAULT PORDER TR-LISP->LISP-FUN
  485.             UNDEFINE-SYMBOL MCX UNRAT FIX GENSYM-READABLE
  486.             MACSYMA-SPECIAL-OP-P *DEFINE-INITIAL-SYMBOLS DISREPLIST
  487.             SP2EXPAND MAPTR-LISP->LISP CHECKRAT MINIMUM RADSORT REPLIST
  488.             RAISE MAKE-VALUES SORTGREAT SIGN* LOWER DET1 FR-ARGS
  489.             OBJECT-FOR-DISPLAY-HACK DEFINE-SYMBOL TREEDET ZERO-LIM
  490.             J[1]-BESSEL STRIPDOLLAR $J1 FORQ UNTRANS-OP FACTORALG
  491.             ECHELON1 CHECK-SUBR-ARGL TR-EXP-TO-DISPLAY POS-NEG-P
  492.             DINTERNP $SHOWRATVARS $IMAGPART CSTRSETUP SIGN-MTIMES
  493.             SOLVE2 $REALPART CREATSYM SIGN-ANY LIMUNKNOWN1 LNEWVAR ALBK
  494.             $J0 %EINVOLVE LNEWVAR1 RATION1 TRIANG RGET
  495.             TR-INFAMOUS-NOUN-FORM LRDTAY DET PREPFLOAT $NZETA EXPP
  496.             MACSYMA-SPECIAL-MACRO-P MEVALP1 I[1]-BESSEL ISP $I1
  497.             GET-LISP-FUN-TYPE CHECK1 $NZETAR CONSSIZE DOUTERN $NZETAI
  498.             TR-NOSIMPP SPEC DCONVX ASKSIGN-P-OR-N
  499.             POSSIBLE-PREDICATE-OP-P RESTORE-FACTS TRANSPOSE DATUM
  500.             $IDENT $NOUNIFY $NEWCONTEXT $DETERMINANT MAXIMUM MNCEXPTP
  501.             MNCTIMESP QUOTED-ARGS-AUX $SCALARP |INCLUDEF-aux|
  502.             ARRAY-TYPE $INVERTMX INVERT1 MXC BIGNUMP $RANK BIGP
  503.             RATINVERT $TRIANGULARIZE MAKE-EQUAL-HASH-TABLE ARRAYDIMS
  504.             MMINUSP FACTORIAL FIXNUMP MAKEGAMMA1 ONEARGCHECK TOTAL-NARY
  505.             $ENTIER IMPLODE MEXPLODEN FORGET ASSUME RESIMPLIFY OPIDENT
  506.             MQUOTEP EXPINT AIRY G[0]-BESSEL I[0]-BESSEL $EXPINT $LOAD
  507.             J[0]-BESSEL $FILE_TYPE $G0 $AIRY G[1]-BESSEL FILETYPE-LIST
  508.             $I0 $G1 MFILENAME-ONLYP NONINTEGERP SAME TMKILLARRAY
  509.             RZCONTENT FFIB $INTOSUM TM$KILL PCONTENT TMPIVOT-ISOLATE
  510.             FNEWVAR MAKCF SP3RECONST FULLRATSIMP CFMAK DISTREXPANDROOT
  511.             SP3FORM1 EXPANDROOT GOODFORM RATF RALGP INTEGERPFR FLEVENP
  512.             TMACCESS CFEVAL SERIESEXPAND* TIMESTEST PALGP PMM-1
  513.             FLOATFACT CFSQRT SP2LOG MONOM->FACL MEXPTP R1M CFRATSIMP
  514.             SP2EXPT RATALGDENOM BIGFLOAT2RAT RATEXP RATDP $BFLOATP
  515.             SERIESPASS1 TRP-MNOTEQUAL SHOW-EXP TRP-MOR SQCONT SP1
  516.             PFLOATP1 EVALQUOTE TRP-MAND OUT-OF ORD-VECTOR MAXNORM
  517.             TRP-MNOT |M-TLAMBDA-I-aux| AUGMULT $ISQRT
  518.             |FUNGEN&ENV-FOR-MEVALSUMARG-aux| TR-UNTRACE FUNTYPEP
  519.             |FUNGEN&ENV-FOR-MEVAL-aux| SP2TRIG DECREMENT-TRUNCS $QUNIT
  520.             MAPCAR-EVAL SANDMAP TSLOG GETFACT |TRD-MSYMEVAL-aux|
  521.             CONSERVE-EVAL-ARGS-DATA PSLOG TR-TRACE-HANDLE GGCD
  522.             REMLABELS GETSUBR! $EULER STRING*1 EXLIST RCCOEFP TR-TRACE
  523.             $BOTHCASES TRAMP1$-M EULER RATMINUS SRBINEXPND
  524.             INVERTBIGFLOAT DPREP TSTIMES-L-MULT DPDISREP FPARCSIMP
  525.             TRAMP1$-F GENERIC-AUTOLOAD EVFAC1 ADJOIN-TVAR MTO-FLOAT
  526.             ARCP $CFEXPAND CFEXPAND TRIGP DPSIMP FILEPRINT
  527.             LISPM-MARRAY-TYPE $FACTCOMB FEXPRCHECK $MINFACTORIAL *FPEXP
  528.             CONSTFUN DOLLARIFY-NAME UFACT-STRIP-ZEROES FACTCOMB1 BCONS
  529.             REDUCE-VAR-SET FILENAMEL %ITOPOT FACTCOMB BIGFLOATP DPDERIV
  530.             LIM-FINITEP RATDISREP $DSKGC KDR ADJOIN-PVAR SIMPNCT-POWER
  531.             DPSQFR COMPPI $RATNUMP $BERN KEY-VAR-POW NOTLOREQ KAR
  532.             ERRBREAK SPECIALP BERN FLIP MAXIMA-FLOAT-PRECISION
  533.             FREE-LISP-VARS-OF-ARGL PROCESS-ERROR-ARGL SCALARCLASS-LIST
  534.             DOLLARIFY RE-TAYLOR-RECURSE SCALARCLASS CONSTP
  535.             PUSH-PRE-TRANSL-FORM DOT2L INFSIMP* DFLOAT ADSUM ERRBREAK2
  536.             IPOLYSUM RADMABS SIGN-POSFUN ZERP DENOM1 POP-PW GENEXPANDS
  537.             IMPLIED-QUOTEP ZEROEQUIV1 TRUEFNAME IPOLY1 NUM1 INTOFP
  538.             ARRAY-MODE-@ MAKE-VAR-SET MTRUENAME RPOLY-SL RULECHK
  539.             FPINTPART $ASKSIGN MFILE-OUT DCONV-$FLOAT ZEROEQUIV2
  540.             FPRATION1 FXSHFR-SL TBOUNDP EVOD-MEXPT $MAKEFACT
  541.             EXPANDTIMES ERRBREAK1 ADUSUM ABSARG1 TR-CLASS
  542.             FREE-LISP-VARS-M-TLAMBDA SIGN-MABS MAKEFACT1
  543.             FREE-LISP-VARS-M-TLAMBDA&ENV $MAKEGAMMA KILLCONTEXT FPMINUS
  544.             CPOLY-SL RISPLIT-EXPT $CFDISREP ASKSIGN01 TBIND FXSHFT-SL
  545.             FPCOS1 CFDISREP1 AMPERCHK SHOW-MSIZE EPS-SIGN VARIABLE-P
  546.             FPSIN1 NOSHFT-SL SPABS ELEM MSIZE-PRINT ASKSIGN1 I-$GRIND
  547.             NUD-CALL BAD-VAR-WARN ERRLFUN VRSHFT-SL RISPLIT-NOUN _EVAL
  548.             $VERBIFY SIGN-PREP STRMEVAL FPABS WARN-UNDEFINED-VARIABLE
  549.             $STATUS-AUX SUSUM1 $POLARFORM $DESCRIBE TIMESBIGFLOAT
  550.             EVAL-FOR-DECLARATIONS TRANSLATE-ATOMS MAKSTRING*
  551.             TRANSLATOR-EVAL 2PISTRIP FUNCTION-MODE INTP
  552.             FIXNUM-CHAR-UPCASE $%TH CONTROL-CHAR TR-WARNP 2PIREC
  553.             DEMOIVRE INTP-MEXPT STRGRIND TUNBIND MPAUSE $DEMOIVRE
  554.             MUNFORMAT STRPRINT ASKSIGN DECL-COMPLEXP SIGN01 MRATCHECK
  555.             $THROW TUNBINDS $RECTFORM $TAYTORAT LISTOVARS1 STYO
  556.             RESTORELIM SRRAT MAXIMA-STRING $RHS RUBOUT* $DENOM MBAGP
  557.             SIGN-MEXPT TRIG-SUBST-P $LHS REMOVEALG NFORMAT
  558.             CF-BACK-RECURRENCE TDNEG VARSORT $RATDENOM %ESPECIAL
  559.             PMODROOT SRRAT2 $FIX $PAGEPAUSE FLOAT2RAT TDPZ SUMI TRIGRED
  560.             PMODROOT1 SCONVERT SLASH HYPEREX SOLVE-SIMPLIST CFMIN PIP
  561.             POLYFORM LOG-IMAG-0-2%PI FMT FACTRAT ALPHABETP NUMDEN ESAP
  562.             EVEN TRIG-NOT-SUBST-P SQRTINVOLVE LOWERHALF
  563.             %E-INTEGER-COEFF MTOSC PDIS ISUM1 POLYP INFR PIN%EX0
  564.             FACTPLUSCOMB %I-OUT-OF-DENOM PRODNUMDEN REMC ROOTSORT
  565.             UPPERHALF LOGQUAD0 SOLVENTH1 PDEGREEVECTOR SPECASEP LOGQUAD
  566.             GETFACTORIAL NEWVAR FACTEXPAND LEADING-COEF
  567.             LOG-RED-CONTRACT SKR MAXI $FIB SINRX PMINUS1 RAT-NO-RATFAC
  568.             PMONZ REMRED OLDCONTENT LOG-REDUCE $ZETA SOLVEQUAD GETEXP
  569.             ALGCONTENT PDECOMP* FACTCOMBPLUS LIMINV SPC4 NPLUS SPC2
  570.             LI3SIMP FACTORLOGS LI3NUMER FPOLYSUM FASTCONT FREEVNZ
  571.             MULTIPLY-GCFACTORS SPC1 LSA LI2SIMP OLDGCDCALL M$EXP?
  572.             PTERMCONT FPOLY1 NEWGCDL MPGET FINDINT CLEAN-LIMIT-EXP
  573.             FINDPOWERS1 ALGORD $OPTIMIZE PUTONLOGLIST CHECKPOW ISGEO
  574.             NUMBERINLISTP GETEXPLIST *RULECHK CONSTCOEF OPTIM
  575.             PDERIVATIVE2 MFBOUNDP RDIS NOTERMS VAR-OR-CONST COMEXP
  576.             SPC2A I-$DEPENDENCIES HIDE COLLAPSE SPC2B LISTOVARS
  577.             $TMINVERSE OPFORMAT ASKINVER CDISREP PDECPRIMEP PDIS*
  578.             *TMREARRAY FINDBE PDECGDFRM #-CMU COMPILER::FN-P SP2INTEG1
  579.             OPMEXPT CHECK-INF-SING FACMGCD TAN APPLY2HACK SINH
  580.             $COLLAPSE COSH NFORMAT-ALL TANH DISPRULE1 OLDREP
  581.             #-CMU COMPILER::FN-NAME CONSRULE #-CMU COMPILER::FN-DEF
  582.             PROCLAIM-PROPERTY #-CMU COMPILER::FN-VALUE-TYPE SUBST1
  583.             #-CMU COMPILER::FN-FUN-VALUES PSFLOAT #-CMU COMPILER::FN-CALLEES
  584.             AT-SUBSTP #-CMU COMPILER::FN-RETURN-TYPE MULTIDEG
  585.             #-CMU COMPILER::FN-ARG-TYPES NEWREP #-CMU COMPILER::FN-NO-EMIT OPTIONS
  586.             #-CMU COMPILER::FN-MACROS DOWN SPECREPCHECK ADJOIN-DATUM
  587.             MAP-EVAL-FOR-DECLARATIONS DECODE RENUMBER-TLIST MENU DOWNS
  588.             UP TAYLOR3 UPS MARGS TAYLOR_SIMPLIFY_RECURSE SUBC-INTERNAL
  589.             MOP TAYLOR2 SUPC-INTERNAL $FLOAT PREP1 FP2FLO FACTORSUM2
  590.             FPCOFRAT VALUE-MODE FACTORSUM1 TEVAL $GFACTORSUM
  591.             PARTITION-PRODUCT DCON PRODUCT-WITH-INNER-SCALARP COMBINE
  592.             WARN-PREDICATE PSLOG2 SIMPNCT-SC-OR-CONST-P PSLOG3
  593.             TRANSLATE-MACEXPR-TOPLEVEL IDENTITYMX DELSIMP
  594.             TR-MDEFINE-TOPLEVEL MXORLISTP1 FORMAT1 TOPLEVEL-OPTIMIZE
  595.             SIMPNCT-INVERT TR-SEQ $DEL TOPLEVEL-OPTIMIZE-1 STOTALDIFF
  596.             DCONV-$CRE DIFF%DERIV PS-LIM-INFP LIM-INFP MOPP1 EZEROP
  597.             TRFAIL PS-GT TR-MFUN GVAR-LIM TRANSLATE-$MAX-$MIN SUBST2
  598.             TRANSLATE-ATOM $ALLROOTS SIMPNCT-ONEP LIM-ZEROP ARRAY-MODE
  599.             DISPLINE SIMPNCT-ASSUMESCALARP SIMPNCT-CONSTANTP TVAR?
  600.             ARRAYFUN-MODE CPOLY-ERR SIMPNCT-BASE FUNCTION-MODE-@ MEQHK
  601.             STRING* ADD-POINT $TRANSPOSE DEGVECDISREP PMINDEGVEC
  602.             I-$UNSTORE ODDELM MFILEP UNIVAR GCDL NON0RAND UNQUOTE
  603.             FINDSIGNOFTHEIRPRODUCT $CONSTANTP CGCDLIST $ROOTSCONTRACT
  604.             RTCON DROPTERMS RTC-GETINFO SETQMODULUS TMEVAL LEFT-OB
  605.             ASCII-NUMBERP RIGHT-OB INTEGERP1 META-OUTPUT LGCCHECK
  606.             $LOGCONTRACT ZEROHK ZEROSHARP MXORLISTP REMLAPLACE IS
  607.             CONSTA $NTERMS)) 
  608. (DECLAIM
  609.     (FTYPE (FUNCTION (T *) *) MFUNCALL APPLICATION-OPERATOR $EXAMPLE
  610.             MACLISP-TYPEP)) 
  611. (DECLAIM (FTYPE (FUNCTION (T FIXNUM T FIXNUM) T) STORA)) 
  612. (DECLAIM (FTYPE (FUNCTION (T FIXNUM FIXNUM FIXNUM FIXNUM) T) OBMTRX)) 
  613. (DECLAIM
  614.     (FTYPE (FUNCTION (T T T) FIXNUM) BEHAVIOR-NUMDEN
  615.             DETERMINE-LIFTING-FACTOR)) 
  616. (DECLAIM (FTYPE (FUNCTION (T (VECTOR T)) T) WALK-GET-LINEINFO)) 
  617. (DECLAIM (FTYPE (FUNCTION (FIXNUM T FIXNUM) T) CPTOMF)) 
  618. (DECLAIM
  619.     (FTYPE (FUNCTION (T *) T) BREAK-FUNCTION BREAK-STEP-INTO
  620.             BREAK-STEP-NEXT CREATE-LIST1 $MAKE_ARRAY TEST-BATCH
  621.             LISPM-REARRAY LIST-VARIABLE-BINDINGS MERROR $NOFIX $NARY
  622.             $INFIX $POSTFIX $PREFIX MREAD-SYNERR HEXPAND MREAD-RAW
  623.             HREDUCE MAXIMA-DRAW-FORM $SETUP_AUTOLOAD MAXIMA-DISPLAY
  624.             POLYLOGP RISCHNOUN *MAKE-LIST TRANSLATE-FROM-STREAM
  625.             $TRANSLATE_FILE ASK-CHOICEP ALTER-PATHNAME $COMPILE_FILE
  626.             REMALIAS TYO ZL-MAKE-ARRAY WARN-UNDECLARED TR-LOCAL-EXP
  627.             CF-CONVERGENTS-P-Q QUOT $BATCH BATCH $SOLVE GET-ARRAY
  628.             TR-NARGS-CHECK MAREF1 WARN-FEXPR WARN-MEVAL TR-LAMBDA
  629.             TR-FORMAT MAPATOMS SORTCAR *REARRAY FORTRAN-PRINT
  630.             $FILE_SEARCH)) 
  631. (DECLAIM
  632.     (FTYPE (FUNCTION (T T) *) RETRIEVE1 PRINT-ONE-FRAME TESTDIVIDE
  633.             RECUR-APPLY OPER-APPLY ARRSTORE ASSIGN-CHECK TRY-EXPANSION
  634.             PNTHROOTP ARRFUNCALL LOAD-FUNCTION SP1EXPT TRACE-APPLY
  635.             APPEARS-IN EZTESTDIVIDE)) 
  636. (DECLAIM (FTYPE (FUNCTION (STRING T) T) GRAB-LINE-NUMBER)) 
  637. (DECLAIM
  638.     (FTYPE (FUNCTION (T T) T) DIM-MNCEXPT SININTP
  639.             DIMENSION-SUPERSCRIPT MAP2C SHEUR1 DEPENDSALL DIM-%PRODUCT
  640.             PRODCOEF SC-CONVERG-FORM DIM-RAT INVOLVE DIM-MQUOTIENT
  641.             COMPILETIMES ZTO%PI2 DIMENSION-LIST COMPILEEACH UNITCIR
  642.             LIMROOT IS-A-POLE COMPILEMATCH STARDISP REAL-ROOTS
  643.             RADBYTERM META-ADD2LNC META-FSET COMPILEATOM GETDEC
  644.             MAKEPREDS DEFMATCH1 COMPILEPLUS NTHCOL NCMULN CDRAS
  645.             SIMPNCT-ANTISYM-CHECK SIMPNCT-MERGE-PRODUCT NONVARCHECK
  646.             *UNION-MODE SIMPNCT-MERGE-FACTORS LIM-POWER SIMPNCT-ALIKE
  647.             CHAINRULE SCALAR-MATRIX-PRODUCTP SDIFF
  648.             MATRIX-MATRIX-PRODUCTP ATOMGRAD COMMUTATIVE-PRODUCTP
  649.             DEPENDS SCALAR-OR-CONSTANT-P DEPENDSL DECMODE-ARRAYFUN
  650.             ZERO-PRODUCTP SDIFFTIMES SDIFFGRAD MFREE SDIFFMAP
  651.             STRONGER-VARS? READ-ONLY-ASSIGN _F PUSH-PW DCONV MGRP RATCF
  652.             PUSH-DEFVAR SUBSUM TR-DECLARE-VARMODE CMOD-SL ERREV-SL
  653.             ASSOLIKE ISLINEAR $PARTITION SPEXP SUBIN
  654.             TRANSLATE-MACEXPR-ACTUAL LISP-FCN-TYPEP FIND-CF RATGREATERP
  655.             SPANG1 SRRAT3 ASSQR RATPLUS ANDMAPCAR ANDMAPC GENFIND
  656.             DINTLOG COMDENOM DYPHEYED SOLVENTH E+ MERGESOLN SOLVENTHP
  657.             *MREAD-PROMPT* PSPLUS PEXPT E= CPOL2P PPLUS PMODREM SUMCOEF
  658.             PRODCOEF1 BOTHPRODCOEF DIM-%INTEGRATE ARGSFREEOF
  659.             DIM-%DERIVATIVE FLRED DMDERIVLONG FINDSES DMDERIVABBREV FR1
  660.             DIMENSION-PREFIX FLGREAT FLGREAT1 RECONC LINDEP PGCD1
  661.             DIM-%AT NISBUILD DIMENSION-POSTFIX LET-RULE-SETTER NISADDON
  662.             DIMENSION-NOFIX DIM-MPLUS PSCOSHA+B PARSE-POSTFIX
  663.             DIMENSION-MATCH DIM-%SUM PSTANHA+B SUBSETL DIM-%LIMIT
  664.             EBAKSUBST PSDIFF1 DIM-MCOND ROOTSP HSIMP DIM-MDO DIM-MDOIN
  665.             PARSE-INFIX DIM-MABS DIM-$MATRIX PARSE-NARY MGETL ADD2LNC
  666.             HDOT MAPPLY-TR HSIMP1 FASPRINT PRADD2LNC PRSMATCH
  667.             MARRAYREF1$ ERB-ERR MAKE-ALAMBDA MYADD2LNC SAFE-ASSOC
  668.             SININT* PARSE TCONS COSINT* PEEK-ONE-TOKEN-G
  669.             SCAN-ONE-TOKEN-G $ARRAYAPPLY POISMERGE22 DIVL POISCOINTEG
  670.             PDIFROWS PDIFFERENCE PCTIMES PTIMESROW PTIMES AVLINIT
  671.             REDRESULT CPBG0 PGCDU PSDISREP+ $POISCTIMES STRIP-ZEROES
  672.             RATDERIVATIVE POISCTIMES1 NCDR EDIFF POISMERGE2 ATRIGH
  673.             $POISTIMES $POISPLUS $POISEXPT PDEGREE INTERSECT* BPROG
  674.             FIXVL1 POLYSUBST BOX INCREASELIST SQFRP HACKIT NTHELEM
  675.             CREATENAME AFIXSIGN WTPEXPT LAPSHIFT PGATH2 $CONS LAPDELTA
  676.             HORN+ RATDIVIDE $RATDIFF $ENDCONS PFET1 RESM1 NSUBSTRING
  677.             $MEMBER LAPEXPT ISQUADRATICP EXTOPCHK RESPROG RAISEUP
  678.             DEPENDS1 NONSYMCHK DIFFLAPLACE DIFFINT DIFFNCEXPT CPRES1
  679.             ADD2* $SN PPLUSCHK ADD2 $AM DIFF-%AT $CN DIFFSUMPROD $DN
  680.             GCALL1$ BEZOUT RATDX PRESIGN $AM1 GCTIME1 GETD0 SUBRESULT
  681.             NEWGCDCALL DIVSUM $POLY_DISCRIMINANT TRIGIN1 IMODP1
  682.             TRYRISCH JACOBI RISCHADD NONSQFRCASE $JACOBI PSUMSQ1 EVMAP
  683.             BBSORT GCFACTOR PTIMESMERGE GCEXPT ATRIG-TRANS FUNCER
  684.             XEXPONGET POLCOEF STRING1 MORP MPRINT MAXIMIN M-SUBSET ROOT
  685.             ARRAYSIZE GETFNCOEFF P*LOGNXP PQUOTIENT PSDISREP2EXPAND
  686.             PORM EVENFN $LOPOW TAY-EXPONENTIALIZE TRYRISCH1 MAPFR1
  687.             OLDGCDL FREEOF RULE-APPLY AMONG RATPL EXPAND FINDPR MZFREE
  688.             DEGODR ZFREE APPLY1HACK RTIMES INTSETUP PSDISREP^ APPLY2
  689.             RGCD DIFF-EXPAND RIB PLCMCOFACTS PTIMES%E NARG1
  690.             EXPAND-SING-TRIG? RESTORELC RPLUS $REMRULE RREMAINDER
  691.             SUBST0 LOGCPI0 REMOVERULE RDIFFERENCE MREMPROP RATREP DIV
  692.             POISCO* TYI-PARSE-INT PRNET EREDUCE EQUO SINDIF FIXVL
  693.             MFREEL ALIKE DINTEXP SUBST-DIFF-MATCH COSDIF EXPTHACK
  694.             DIMENSION-ARRAY-OBJECT STRONGER-VAR? POWERSET
  695.             MCONS-EXP-ARGS DIMENSION-STRING FACTORSUM0 POISCODIF
  696.             PSTERM1 $LISTP_CHECK NCPOWER FILLARRAY DIFFEXPT RADIC
  697.             NCMUL2 PINTERPOLATE PSTIMES*1 RATDX1 PSCTIMES* ALLPRODS
  698.             UNION* AP1 $FILLARRAY PINTERPOLATE1 PINTERPOLATE4
  699.             PINTERPOLATE2 STURMSEQ RLESSP PINTERPOLATE3 RDIFFERENCE*
  700.             ASK-INTEGER RPLUS* $FASTTIMES ASK-EVOD RREDUCE LIM-TIMES
  701.             FPTIMES $SIMPLE_EQUAL PFACTOR2 FREE GREATERRATP PREM
  702.             TRUNC-VECTOR FPTIMES1 STURM1 PSDISREP* HALFSPLIT
  703.             IMPROPER-ARG-ERR TRUNC-VECT1 SUBST2S LSFT PSTRUNC1
  704.             ASK-DECLARE IVAR DECLARRAY CHEBYF PGCDM VGREAT IVAR2 MULN
  705.             WTPCTIMES BAKSUBST FINDROOTS ASSIGN-MODE-CHECK CEIL PNEXT
  706.             DECLFUN NESTIFY MEMALIKE FPCOFRAT1 SOLVE3 EXCLUDE ZL-MEMBER
  707.             $ALGSYS MGET PPLUS1 PEXPTSQ ZEROCOEFL BAKSUBST1 INTERSECT
  708.             SOLVE1A FIRST-ORDER-P ORDERLESSP BROKEN-FREEOF
  709.             LINEAR-TERM-P SOLVE-BY-DECOMPOSITION PTERM ASSQ ADDPARAM
  710.             MREAD-PROMPTER CONVERT COVERS $JN Z-FUNCTION
  711.             ATTEMPT-TRANSLATE-RANDOM-SPECIAL-OP MAXIMA-REMF
  712.             ATTEMPT-TRANSLATE-RANDOM-MACRO-OP KCNTXT TIMEX0
  713.             TR-LISP-FUNCTION-CALL TIMEX1 MEQP CTIMESX NEXTLEVEL COMPUMD
  714.             $IN ASSOO $GAUSS MULTIPLYMATRICES MULTMAT MBUILDQ
  715.             MAKE-DECLARES ADDF MBUILDQ-SUBST CNTXT APDL
  716.             MBUILDQ-SPLICE-ASSOCIATE MBUILDQ-ASSOCIATE ASSCONTEXT
  717.             TIMESROW SETPLIST ALPHALESSP STORE-MACRO-HELPER $DIAGMATRIX
  718.             MULTL $CHARPOLY HAIPART POWERX FSET OLDGET DIAGINV SAFE-GET
  719.             ZL-ASSOC PLCM $COL NTHKDR RCPLUS! NARY1 EQTEST APPEARS1
  720.             SIMPLIFYA PSANS-ADD POWER* CONSTMX MEVALSUMARG EVENFUN
  721.             ORDMEXPT DO%SUM PSTANA+B QUOTE-SIMPLE-EQUAL GETCHARN
  722.             UNEQUAL-PAIRLIS PSPLUS1 G[N]-BESSEL PLS MMACRO-APPLY
  723.             MMACROEXPANSION-CHECK PLUSIN ADDN SCMP RETRIEVE MDEFMACRO1
  724.             GETL EXPTB MMACRO-DISPLACE RCEXPT1 MUL2 SINSP FPATAN2 ADDMX
  725.             OUTATIVE RATEXPT HIPART SIMPMAP FPPREC1 PSCPLUS FPSINCOS1
  726.             GETCHAR FPSHIFT PSINHA+B DIM-BIGFLOAT SPSIMPCASES
  727.             LINEARIZE1 LASTN SEL-ERR MXPLUSC SIMPCHECK TSEXPT1
  728.             MULTIPLICATIVE GGR FSEL GGR1 SELECTOR LASSOCIATIVE CHEBY
  729.             SUMTIMES SPECIAL-CONVERGENT-FORMP DEFINE-MACRO CHEBY-PRIME
  730.             DEFINE-MODE NARG-LISTIFY1 GREAT XTORTERM SUMULTIN
  731.             MAYBE-RESET *FPSIN ADDITIVE NOTINVOLVE PSISIMP1 BIGLSH
  732.             LESSTHAN EXPGAM-FUN COMMUTATIVE1 BYGAMMA INTERVAL
  733.             RASSOCIATIVE DINTRAD0 INTBYTERM $SUBLIST SUMPLS ONEDIFF
  734.             REAL-BRANCH ALIKE1 DLF-MUMBLIFY PRINT-SPACES ZGCD
  735.             LINEARIZE2 ANTISYM ZGCD1 SQDTC FREEL EXCISE-EXTRA-VARIABLES
  736.             SIMPARGS MSETCHK ZTOINF POLY? NO-ERR-SUB DSFUNC1 SMONO
  737.             ASET-BY-CURSOR MTOINF ASK-GREATEQ MERGE-SKEL SMONOP
  738.             NEW-SKEL FACTORIAL-TRANS ISINOP SUB* BXM $FUNMAKE
  739.             EXPAND-AND-DISREP MERGE-SOL-LIN ODDFUN $ARRAYMAKE $REM
  740.             POINTERGP SCRAT EZGCD2 RADICALP ADDROW PGCD ARRAYINFO-AUX
  741.             SININT EXP-CONVERG-FORM PCSUBSTZ DIMENSION-ATOM DIM-MTEXT
  742.             EVAL-MON DIMENSION-NARY LISTIFY1 GETGOODVALS ZPDEGREEVECTOR
  743.             MAKORDER ALIAS MUL2* PCDIFCONC RTC-FIXITUP RT-SEPAR
  744.             FIRST-FORM-LINE $GETCHAR NPCTIMES DISTRINT PMODQUO
  745.             SIMP-ROOTS NPQUO MAXIMA-RATIONALP PPPROG RTC-DIVIDE-BY-GCD
  746.             NPCTIMES1 ILT2 $BINOMIAL ALGTESTD RQUOTIENT CPBER3 LOGARC
  747.             SIMPNRT *FPATAN RCEXPT CTIMEMT TMUNIFY-LOOP TMPATHP
  748.             $COEFMATRIX $AUGCOEFMATRIX TRANSFORM-TVAR TMDET
  749.             ITERATE-OVER-BKPTS RATCOEF CONST1 $ENTERMATRIX TSEXPT
  750.             TMERGE NISSWCAR NISTREELISTER BEG TMCOMBI NISTREETRIMMER
  751.             EMAX REMOV4 NISSWCDR ZL-REMPROP $BOTHCOEF NISREPLACE MARK+
  752.             MSET NISFIX TAY-ERROR LISTN PSDERIVATIVE HALFANGLE
  753.             HALFANGLEAUX MERGEF GET! CALL-BATCH1 REM-TRACE-INFO TAYLOR*
  754.             TRACE-UNFSHADOW TAYLOR1 TRACE-OPTION-P
  755.             MICRO-PER-CALL-TO-SEC TRACE-HANDLER PRINT-ABORT-MSG
  756.             SP1TPLUS SP1TLIN SP1SINCOS SUBRESGCD REDGCD TIMER-HANDLER
  757.             SP1SINTCOS ALGTRACE POLY-IN-VAR SP1SINCOS2 MONOMGCD RADFUNP
  758.             PGCD2 ALGNORM OLDCONTENT1 $SPLITFIELD CONTODR PCONTENT1
  759.             CGCD CONSTERM RATSETUP PCQUOTIENT1 PNTHROOT INTIR CNTHROOT
  760.             INTE PSINA+B NMT ORDFN CREMAINDER ORDFNA INTIR-REF IROOT
  761.             CQUOTIENT NRTHK INTIR3 PFACTORLIN RADSUBST EGCD PSIMP
  762.             INVMOD NRTHK1 INTIR2 RE-ERAT PDIVIDE NRTHK2 PCPLUS FFACTOR
  763.             INTIR1 PSCOSA+B LIMITSIMP-EXPT $INRT PCDIFFER PLSK RATCOEF1
  764.             RETFACTOR1 RATP $AT PDERIVATIVE3 FACTOROUT1 ELLIPTQUAD
  765.             EXPTA $POLYDECOMP REMOVE-SINGULARITIES FREEOFL PDECOMP1
  766.             PCTIMES1 TIMESKL INTIRFACTOROOT PSDISREP*EXPAND CBEXPT
  767.             $-READ-AUX $PARTFRAC FACTPOW RATDIFFERENCE PCPLUS1 PSCPLUS1
  768.             RATINT PCDIFFER2 HEURTRIAL INTIRA FREEARGS CFTIMES RCDIFF!
  769.             PCDIFFER1 FIXMULT JMAUG TMKILL APPEARS PDIVIDE1 $ORDERLESSP
  770.             EXTRACT PSIMP2 $ORDERGREATP CONF5 SUBSTITUTE-KEYWORD-ARG
  771.             RATFACT DISTRFACTOR MULT XPTIMES CFEXPT SP2DIFF TMSYMETRICP
  772.             FACTOROOT HAND-SIDE CAREFULFACTOR SP2SUB PTIMES*
  773.             TMSORT-LATTICE RESTOREX EXT-1M EVERYSUBST2 SRATP PAIROFF
  774.             CONF4 RATDP1 ROOT+ANYTHING CONF7 DISTRESTOREX RESTOROOT
  775.             CONF6 COMPATIBLE-ARRAY-TYPE? OLDGCD WRAP-AN-IS *DIF
  776.             MAKE-GTRAMP SRATEXPND PUSH-AUTOLOAD-DEF RATEXAND1 TRAMP2$-M
  777.             ADFACTL TRAMP2$-F TR-MAREF NXTBINCOEF TR-ARRAYSETQ DPGCD
  778.             DUP MAKE-GTRAMP$ DPDIF REDUCE-VAR-SET&OP ZERORES DPMODQUO
  779.             DPMODREM CFPLUS XOR DIFFERENCE-VAR-SETS $ZEROEQUIV *RED
  780.             C-$PN EXPANDTERMS EXPANDSUMS C-$POS ATAN INFSIMP1 MNQP
  781.             INFSIMP2 CFDIFF INTEXT YUK-SU-META-PROP SUM MLSP C-$ZERO
  782.             C-$PZ $GN MGQP DCOMP DEQ $BESSEL OBSOLETE-VARIABLE TIMEX
  783.             NEWVARMAT SIGNDIFF-SPECIAL KINDP SINH^N SAFE-MGET DCOMPARE
  784.             NUMERSET COS^N COSH^N  NEVERSET DGQ MAXIMA-REDUCE
  785.             RGRP EVFUNMAKE DLQ MCONS MEVAL2 $COMPARE MSETERR MMOD
  786.             %PIARGS MFORMAT-TRANSLATE MTELL-TRANSLATE TRIGEXPAND REMOV0
  787.             MULTIPLEP SQ-SUMSQ REMOV3 MERROR-TRANSLATE ERRRJF-TRANSLATE
  788.             RATQU PQUO PTIMES1 CEXPT FPGCDCO DISPLAF PQUOCOF ORDE
  789.             QUICK-SQFR-CHECK |''MAKE-FUN| LMAKE LMAKE2 $ISOLATE
  790.             CREATE-LIST2 PGCDCOFACTS MARK- LGCD1 NEWSYM2 $PICKAPART
  791.             $REVEAL MAKPRODG MAKPROD OFFP ONP DOPGCDCOFACTS UNION1
  792.             FACRPLUS ONPU PTIMESCHK ZFACTSPLIT UPOLY+ FSPLIT
  793.             OLDCONTENT2 BEG- TERM* ESHIFT PADE1 KLIM LET-MACRO-GET-VARS
  794.             PADE-MONIZE NALGFAC END- END MID- ASY CANCEL MEMQ MID RDDEG
  795.             LHOP-NUMDEN ASSOL TRIG-RIGHT-PLACEP LIMITSIMP XXORM
  796.             LIMITSIMP-DISPATCH POISLIM1 POISXCOEF $POISINT INSERT-IT
  797.             LPR LABEQ POISCO+ PAR IND1 PATAN RATQUOTIENT ORMAPC BDISCR
  798.             RATDIF ITH BINCOMP1 EXCHANGEVAR PSQFRP BINOCOMP ORDERVAR
  799.             RESULTANT PSCSUBST1 ALGTRACE1 PSEXPT ALGTRACE* EMIN BINCOMP
  800.             $ZEROMATRIX PSDIFF TMSTORE LED-CALL NTHCOL1 DELETECOL
  801.             DELETEROW $ROW MXTIMESC TRIG-SUBST STIMEX MAYBPC ADDMATRIX
  802.             PSTRIM-TERMS ADDMATRIX1 LINPOWER0 ADDROWS PSTERM ERFARG2
  803.             LINPOWER ERFARG PSTIMES FIND1 EASY-CASES MATCHSUM PARTNUM
  804.             INTGREAT E> LSAFIX E* TRIGINT RESTORE-DEFINT-ASSUMPTIONS
  805.             FPR-DIF $HIPOW FINDFLIST FINDPOWERS SUBLISS USOLVE
  806.             SPDERIVATIVE $BERNPOLY TIMESLOOP POWER RISCHEXPPOLY ADDK
  807.             SCEP ODDFN LINEARP DIV* SHEUR FACTQSNT RISCHINT FSGEO RHEUR
  808.             FBINO CPROG OPERATOR-FREQUENCY-TABLE INTSUM CFQUOT CNV
  809.             RE-SOLVE-FULL HIDELIM FACTPLUS2 EXPANDS SHEUR0
  810.             BATCH-INTERNAL FACTPLUSDEP INTEGRATE5 SSOLVE INTEGRATOR
  811.             WLINEARPOLY $RISCH BEHAVIOR-EXPT LOGEQUIV *QUO DIFFDIV
  812.             PMON1 CHOICESIN VARINVERT MAKE-LI PQUOTIENT1 PUTLIMVAL
  813.             PQUOTIENT2 ATRANSPOSE PDECPOW POWERLIST $LINSOLVE MXCOMP
  814.             RATREDUCE CAR> EXPFACTORP ROMBERG-MACRO MAKE-TRAMP$
  815.             MAKE-INPUT-STREAM PDERIVATIVE TAYLIM LODEG GPDIFFERENCE
  816.             PATIMES DOT-SP-RI BRANCH1 RAT3 PQUOTIENTCHK POWERS TIMESK
  817.             CONST GCPOWER NZEROS PCQUOTIENT AMONGL INTERPOLATE-MACRO
  818.             GENATAN PDECOMP MEMBERCAR SOLVESPEC ISGREATERP LOCOEF
  819.             SIGNNP PDIFFER1 GPTIMES LINSORT EXPAND-TRIGS PREVCONSTEXPAN
  820.             DOT--RI DISTRINTIMESPREV EXCHANGECOL SPC3 GPPLUS PAQUO
  821.             MCONS-OP-ARGS DISTRINPLUSPREV GPCTIMES POLYDECOMP DGR
  822.             INSIDE MDEFINE1 PSIMP1 CPA1 RAT EXCHANGEROW DETPIVOT
  823.             DIVCARCDR STRONGP $SUBLIS DECLAREKIND MSUBLIS MKIND
  824.             MSUBLIS-SUBST REMARRELEM LIKE REMVALUE LEARN GATHER
  825.             |/#ALIKE| SUMCONTRACT2 DADDNQ SUMCOMBINE1 DADDEQ REMALIAS1
  826.             SUMCOMBINE2 DADDGQ DADDGR SIMPLIMSUBST ZL-GET DECLSETUP
  827.             PAGEPAUSE1 GETL-LM-FCN-PROP MFUNCTION-DELETE GCTIMEP DLS
  828.             SP1GREAT DEBUGMODE1 KIND BOTHCASES1 GETLABELS* SUB DNQ
  829.             DMARK SP1ATRIG SP1ATRIG2 SAFE-MGETL SIN^N CYCLP
  830.             MFUNCTION-CALL-WARN $POISDIFF MGRIND EXPT$ MAKE-M-LAMBDA&
  831.             TSTIMES-GET-PW STRONGER-DATUM? EXPONENTIALIZE EXPTBIGFLOAT
  832.             FPGREATERP FPLESSP FPEXPT FPTIMES* |$SSTATUS-aux|
  833.             FPQUOTIENT FPROOT FPDIFFERENCE EXPANINTEXPT FPSIN EXPTRL
  834.             FPPLUS DSKGC1 MAXMINL REPRINT BYLOG HEURTRIAL1
  835.             SIDE-EFFECT-FREE-CHECK NOT-ZERO-FREE $NTHROOT LINEAR*
  836.             $FEATUREP M1 $GET ALGPCHK START-VAL DIM-MBOX
  837.             SIMPLIM%ERF-%TANH SIMPLIMSCH DIMENSION-FUNCTION EACHP
  838.             DIMENSION-ARRAY LOOPP DIMENSION-PAREN PDISREP2 BRANCH
  839.             PDISREP2EXPAND DIM-MLABOX EPS-COEF-SIGN RATSETUP2 SCHATCHEN
  840.             ALGORDSET TRDISP1 QUEUE+P SIMPLIM%ASIN-%ACOS FINDTHEM
  841.             SCH-LOOP FDEL SCH-REPLACE QUEUE-P RATSETUP1 TOTAL-SIGN
  842.             PDISREP* UNKIND PDISREP! PDISREP*EXPAND SCS FANCYDIS
  843.             $FACOUT DIM-MLABEL LIMFACT SPANGSIDE ADD2CSTR1 SP3FORM
  844.             DIM-MDEFINE DIMENSION-INFIX PRENUMBER)) 
  845. (DECLAIM
  846.     (FTYPE (FUNCTION NIL FIXNUM) [MAX-TRUNC] CHRCT* REALIT-SL STERPRI
  847.             LISTEN CHRCT SYS-GCTIME)) 
  848. (DECLAIM
  849.     (FTYPE (FUNCTION NIL (VALUES T T)) SCAN-MACSYMA-STRING
  850.             SCAN-LISP-STRING SCAN-KEYWORD-TOKEN))
  851.  
  852.  
  853. (declaim
  854.  (ftype (function (*) t) meval1
  855.      quot merror errrjf sort typep inf-signal mread $filename_merge
  856.      maclisp-typep SCAN-DIGITS dimension maset1 error cerror
  857.      $file_search mtell))
  858. |#
  859.  
  860.  
  861. (declaim (SPECIAL
  862.                 *mlambda-call-stack* *LAST-MEVAL1-FORM*
  863.   TRIM TRIM *EU* *BD* *BN* $MAXPRIME $ASSUMESCALAR $DOTIDENT
  864.   $SCALARMATRIXP $DOMXNCTIMES $DOSCMXOPS $DOMXMXOPS $DOALLMXOPS
  865.   $DOTASSOC $DOTEXPTSIMP $DOTDISTRIB $DOTSCRULES $DOT1SIMP
  866.   $DOT0NSCSIMP $DOT0SIMP $DOTCONSTRULES $OPTIMWARN $OPTIMPREFIX
  867.   *SUBEXP* $FORTFLOAT $FORTINDENT $FORTSPACES $OPPROPERTIES OPERS
  868.   *OPERS-LIST *INFSUMSIMP $PRODHACK $SUMHACK $SIMPSUM $ZEROBERN
  869.   $GENINDEX $GENSUMNUM $CAUCHYSUM $ZETA%PI $TIMER_DEVALUE
  870.   GCTIME-DEVALUE RUNTIME-DEVALUE $TIMER $TRACE_MAX_INDENT
  871.   $TRACE_BREAK_ARG $TRACE_SAFETY RETURN-TO-TRACE-HANDLE
  872.   PREDICATE-ARGLIST TRACE-INDENT-LEVEL TRACE-HANDLING-STACK
  873.   HARD-TO-TRACE $TRACE ALGNOTEXACT $ALGEXACT REALONLYRATNUM $REALONLY
  874.   $%RNUM_LIST $ALGDELTA FLAG4 $SOLVERADCAN $SOLVETRIGWARN
  875.   $SOLVENULLWARN $SOLVEFACTORS $SOLVEEXPLICIT $SOLVEDECOMPOSES
  876.   $PROGRAMMODE $SOLVE_INCONSISTENT_ERROR $LINSOLVEWARN $MULTIPLICITIES
  877.   $BREAKUP PRESERVE-DIRECTION LIMIT-ANSWERS SIMPLIMPLUS-PROBLEMS RD*
  878.   INFINITESIMALS REAL-INFINITIES INFINITIES $LET_RULE_PACKAGES
  879.   $CURRENT_LET_RULE_PACKAGE $DEFAULT_LET_RULE_PACKAGE $LETRAT
  880.   $LETVARSIMP MATCHREVERSE $MAXAPPLYHEIGHT $MAXAPPLYDEPTH *TMARRAYS*
  881.   $MATRIX_ELEMENT_TRANSPOSE $MATRIX_ELEMENT_ADD $MATRIX_ELEMENT_MULT
  882.   $RATMX TOP* $DETOUT $LINSOLVE_PARAMS $%RNUM *MOSESFLAG SOLVEXP *INV*
  883.   *RANK* $BACKSUBST $SPARSE $GLOBALSOLVE *S12* *LI3* *LI2* PIBY2
  884.   -SQRT3//2 SQRT3//2 -SQRT2//2 SQRT2//2 %PI//2 %PI//4 |-1//2| |1//2|
  885.   $HALFANGLES $LOGARC $EXPONENTIALIZE $TRIGSIGN $TRIGEXPANDTIMES
  886.   $TRIGEXPANDPLUS $TRIGEXPAND $TRIGINVERSES $%IARGS $%PIARGS
  887.   NONINTEGERL INTEGERL DEFINTDEBUG TRUNC-CONSTANTS?
  888.   $TAYLOR_ORDER_COEFFICIENTS TVAR-LIMITS $TAYLOR_SIMPLIFIER
  889.   $TAYLOR_LOGEXPAND $TAYLOR_TRUNCATE_POLYNOMIALS $MAXTAYORDER
  890.   $PSEXPAND *WITHIN-SRF?* TLIST CHANGEVP $ERFFLAG $LIFLAG
  891.   $INTEGRATION_CONSTANT_COUNTER COMPLEXSIGN RHS LHS EVENS ODDS MINUS
  892.   SIGN PATEVALLED LOCALS FACTORED $ASSUME_POS_PRED $ASSUME_POS LIMITP
  893.   $ASKEXP $SIGNBFLOAT $PREDERROR COMPLEXSIGN SIGN-IMAG-ERRP
  894.   $ACTIVECONTEXTS $CONTEXTS $CONTEXT CONMARK CONUNMRK LAB-HIGH-LAB
  895.   LABNUMBER LAB-HIGH-BIT CONNUMBER CONINDEX ULABS -L +L MARKS NOBJECTS
  896.   DOBJECTS DBCHECK DBTRACE -LABS +LABS CURRENT CONTEXTS CONTEXT
  897.   $POLYFACTOR $LISTDUMMYVARS $LISTCONSTVARS *DESCRIBE-INDEX-DIRECTORY*
  898.   *INDEX-FILE-TYPE* *DESCRIBE-INDICES* $ALL_MACSYMA_DOCUMENTATION
  899.   $DESCRIBE_DOCUMENTATION *PDP-DESCRIBE* *WORD* $POINTBOUND *ALPHA RB
  900.   LB FORTRANP $NEGSUMDISPFLAG $SQRTDISPFLAG $EXPTDISPFLAG $%EDISPFLAG
  901.   $PFEFORMAT $POWERDISP ATOM-CONTEXT $DISPLAY_FORMAT_INTERNAL
  902.   LINEARRAY $RMXCHAR $LMXCHAR $ABSBOXCHAR $BOXCHAR D-MOREFLUSH
  903.   D-MOREMSG DISPLAYP STRINGDISP $NOUNDISP $DERIVABBREV $LINEDISP
  904.   $LISPDISP $DISPLAY2D $LEFTJUST $STARDISP $CURSORDISP
  905.   LINE-GRAPHICS-TTY CHARACTER-GRAPHICS-TTY $PARSEWINDOW
  906.   SCAN-BUFFERED-TOKEN *SCAN-STRING-BUFFER* PARSE-TYI PARSE-TYIPEEK
  907.   *MREAD-EOF-OBJ* *MREAD-PROMPT* MACSYMA-OPERATORS *PARSE-STREAM*
  908.   ALPHABET ALPHABET ROMB-PRINT $ROMBERGIT_USED $ROMBERGABS $ROMBERGTOL
  909.   $ROMBERGMIN $ROMBERGIT TRAMP$-ALIST 
  910.   *UNKNOWN-FUNCTIONS-INFO-STACK* *KNOWN-FUNCTIONS-INFO-STACK*
  911.   META-PROP-L META-PROP-P *FCALL-MEMORY* *TR-RUNTIME-WARNED*
  912.   $TR_WARN_BAD_FUNCTION_CALLS FORMS-TO-COMPILE-QUEUE
  913.   A-RANDOM-COUNTER-FOR-GEN-NAME *INFILE-NAME-KEY* *MAX-EXPT$-EXPAND*
  914.   *NUMBER-TYPES* WRAP-AN-IS $MACSYMA_EXTEND_WARNP $MODE_CHECK_ERRORP
  915.   $MODE_CHECK_WARNP $MODE_CHECKP $TR_EXPONENT
  916.   $TR_FLOAT_CAN_BRANCH_COMPLEX VALUE-ALIST UNBOUND-MEVAL-KLUDGE-FIX
  917.   LISP->LISP-TR-LAMBDA $TRANSLATE_FAST_ARRAYS TRF-START-HOOK
  918.   *PRETTY-PRINT-TRANSLATION* $TR_GEN_TAGS TR-DEFAULTF $TR_STATE_VARS
  919.   $TR_TRUE_NAME_OF_FILE_BEING_TRANSLATED $COMPGRIND TRANSL-FILE
  920.   $TR_WINDY $TR_FILE_TTY_MESSAGESP $TR_OUTPUT_FILE_DEFAULT
  921.   *TRANSL-FILE-DEBUG* $TR_BIND_MODE_HOOK $TR_BOUND_FUNCTION_APPLYP
  922.   $TR_OPTIMIZE_MAX_LOOP *$ANY-MODES* WARNED-UNDEFINED-VARIABLES
  923.   *TR-WARN-BREAK* TR-LAMBDA-PUNT-ASSIGNS MODE-INIT-VALUE-TABLE
  924.   BOOLEAN-OBJECT-TABLE $TR_PREDICATE_BRAIN_DAMAGE $TR_NUMER
  925.   $TR_ARRAY_AS_REF $TR_FUNCTION_CALL_DEFAULT *WARNED-MODE-VARS*
  926.   *WARNED-FEXPRS* *WARNED-UN-DECLARED-VARS*
  927.   $TR_WARN_UNDEFINED_VARIABLE $TR_WARN_MODE $TR_WARN_FEXPR
  928.   $TR_WARN_MEVAL $TR_WARN_UNDECLARED TR-UNIQUE TR-ABORT *TRANSL-DEBUG*
  929.   *TRANSL-BACKTRACE* TRANSLATE-TIME-EVALABLES SPECIALS ASSIGNS
  930.   NEED-PROG? RETURN-MODE RETURNS INSIDE-MPROG TR-PROGRET FEXPRS EXPRS
  931.   LEXPRS ARRAYS LOCAL TSTACK $SPECIAL $TRANSCOMPILE $TR_SEMICOMPILE
  932.   *UNTRANSLATED-FUNCTIONS-CALLED* $TRANSBIND MODULE-STACK
  933.   TRANSL-MODULES ARGSFREEOFP $RADSUBSTFLAG $RATDENOMDIVIDE $RATEXPAND
  934.   $RATEPSILON $RATPRINT FR-FACTOR *WITHINRATF* ALPHA ADN* INRATSIMP
  935.   TELLRATLIST $FACEXPAND $RATVARS $ALGEBRAIC $RATFAC $RATWEIGHTS
  936.   $NOREPEAT $DONTFACTOR $FACTORFLAG $KEEPFLOAT FACTORRESIMP *RATSIMP*
  937.   *RATWEIGHTS *FNEWVARSW VARLIST GENPAIRS GENVAR *ALPHA BIGPRIMES $GCD
  938.   *GCDL* $HOMOG_HACK CHECKFACTORS $SAVEFACTORS $BERLEFACT $INTFACLIM
  939.   LOW* ALGFAC* *IRREDS $RATALGDENOM $RATWTLVL ERRRJFFLAG HMODULUS
  940.   MODULUS *RESULTLIST $RESULTANT THR* $NEWFAC $NALGFAC SMALLPRIMES
  941.   ALPHA MM* MPLC* MINPOLY* *MX* *MIN* GAUSS
  942.   *MACSYMA-EXTEND-TYPES-SAVED*
  943.   $DONT_KILL_SYMBOLS_WITH_LISP_SOURCE_FILES AUTOLOAD $SHOWTIME
  944.   $FILE_STRING_PRINT $CHANGE_FILEDEFAULTS ALIASLIST $SHOWTIME
  945.   $MOREWAIT MOREFLUSH MORECONTINUE MOREMSG USER-TIMESOFAR CASEP $DIREC
  946.   $LINENUM $LINECHAR $OUTCHAR $INCHAR $% $PROMPT MOPL *COLLECT-ERRORS*
  947.   
  948.   $FILE_TYPES *MACSYMA-STARTUP-QUEUE*  $CANONICAL_TYPES
  949.   ACCUMULATED-TIME $__ $_ ABSFLAG GENERATE-ATAN2 IMPLICIT-REAL
  950.   $BETA_ARGS_SUM_TO_INTEGER $GAMMALIM $SUMSPLITFACT HALF%PI3 %PI2
  951.   HALF%PI FOURTH%PI %P%I MAX-BFLOAT-%E MAX-BFLOAT-%PI *DECFP *M FPPREC
  952.   BIGFLOAT%PI BIGFLOAT%E BFMHALF BFHALF BIGFLOATONE BIGFLOATZERO
  953.   $FPPREC $FPPRINTPREC $BFTRUNC $BFTORAT $FLOAT2BF *AFTERFLAG
  954.   DERIVSIMP ERRORSW DOSIMP $MAXNEGEX
  955.   $MAXPOSEX $EXPON $EXPOP $MX0SIMP $DOMXTIMES $DOMXPLUS $DOMXEXPT
  956.   $DOSCMXPLUS $NUMER_PBRANCH $SUMEXPAND $SIMP $NUMER $NEGDISTRIB
  957.   $FLOAT $MACROEXPANSION $USE_FAST_ARRAYS $SETCHECK MUNBINDP
  958.   FLOUNBOUND FIXUNBOUND MUNBOUND $ROOTSCONMODE $SUPERLOGCON
  959.   SUPERLOGCON $LOGCONCOEFFP DUMMY-VARIABLE-OPERATORS $VECT_CROSS
  960.   $COMBINEFLAG $ISOLATE_WRT_TIMES $EXPTISOLATE $ERROR_SYMS $ERROR_SIZE
  961.   $ERRORMSG $ERROR DEBUG $SUBLIS_APPLY_LAMBDA $NICEINDICESPREF
  962.   $RATVARSWITCH CANT-OPEN-COMPILE-MFORMAT WANT-OPEN-COMPILED-MFORMAT
  963.   MBINDING-USAGE TTYOFF WRITEFILEP MACSYMA-OPERATORS SYMBOLS-DEFINED
  964.   USE-SUBRCALL *ALL-ARRAYS* ^R ^W FORWARD-SLASH-STRING
  965.   $FORWARD-SLASH-SYMBOL VERTICAL-STROKE-CHAR PERIOD-CHAR
  966.   RIGHT-PARENTHESES-CHAR LEFT-PARENTHESES-CHAR FORWARD-SLASH-CHAR
  967.   BACK-SLASH-CHAR SEMI-COLON-CHAR DOUBLE-QUOTE-CHAR *RESET-VAR*
  968.   *MACSYMA-READTABLE* *SHARP-READ-BUFFER* *SCAN-STRING-BUFFER*
  969.   *MAXIMA-ARRAYS* *CL-MAKE-ARRAY-OPTION-REPLACEMENTS*
  970.   *MAKE-ARRAY-OPTION-REPLACEMENTS* *PRIMITIVE-DATA-TYPE-FUNCTION*
  971.   *ALLOW-REDEFINES* PRIN1 ERRSET *SHOW-ALL-DEBUG-INFO*
  972.   *CATCH-ERROR-STACK* *DISABLE-CATCH-ERROR* *CATCH-ERROR*
  973.   *ERROR-HANDLER-FUNCTION* *MACRO-FILE*))
  974.